Part 2 How to use NitinVbaApp Add ins tool

Quick Access Add ins VBA Code

How to Move Excel sheet Data to Other workbook




Example1:-Move Excel sheet Data to Other workbook

Copy Below Code and Paste in Module


Sub movefileotherworkbook()
Workbooks.Open Filename:="C:\NitinVbaAppAMD\nitin1.xlsx"
ActiveSheet.Range("A2:F4").Copy

Workbooks.Open Filename:="C:\NitinVbaAppAMD\nitin2.xlsx"
'eColumn = ActiveSheet.Cells(1, Columns.Count).End(xlToLeft).Column
'If eColumn >= 1 Then eColumn = eColumn + 1
ActiveSheet.Cells(1, 1).Select
Selection.PasteSpecial Paste:=xlPasteAll, Operation:=xlNone, Skipblanks:=False, Transpose:=True
ActiveWorkbook.Save
ActiveWorkbook.Close
Application.CutCopyMode = False

End Sub

Note:-Green Highlight you can Update/change 
Note this code not paste nitin1 and nitin2 please paste another for run macro.

Click for more vba code-https://myvbacode.blogspot.com/2019/11/how-to-move-excel-sheet-data-to-other.html

About Me

author Click here for Connect FB

Click here for Linkedin

Related Post No.

Facebook

Powered by Blogger.

Search This Blog

Recent Posts

About me

authorHello My Name is Nitin, I Offer /Share with you as Entertainment jokes, VBA code, Excel Trick, GK Question.
Learn More →

Trending Topic

Trending Topic

Related Post No.