Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
copying cells from one file to another file
Hello. I need help. I am not a profession VBA programmer. I want to
create macro such that it will copy some cells from a file(let C: \folder\file1) to other filelet C:\folder\file2). The below macro isnot my main macro. However if it works, I can make work may main macro. But the below one doesnt work, with same style how can I make it work? Thanks alot I try to copy "cell(1,1) of Sheet1 of C:\folder\file1" to "cell (1,1) of Sheet1 of C:\folder\file2" Sub macro1() F1 = "C:\folder\file1" F2 = "C:\folder\file2" F2.Sheets("Sheet1").Cells(1,1) = F1.Sheets("Sheet1").Cells(1,1) End Sub |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
copying cells from one file to another file
Try these changes
Sub CopyCells() F1Name = "C:\folder\file1" F2Name = "C:\folder\file2" Set F1 = Workbooks.Open(Filename:=F1Name) Set F2 = Workbooks.Open(Filename:=F2Name) 'this will not copy any formating F2.Sheets("Sheet1").Cells(1, 1) = F1.Sheets("Sheet1").Cells(1, 1) 'this will copy formating F1.Sheets("Sheet1").Cells(1, 1).Copy _ Destination:=F2.Sheets("Sheet1").Cells(1, 1) 'or copy multiple cells F1.Sheets("Sheet1").Range("A1:B10").Copy _ Destination:=F2.Sheets("Sheet1").Cells(1, 1) End Sub "oercim" wrote: Hello. I need help. I am not a profession VBA programmer. I want to create macro such that it will copy some cells from a file(let C: \folder\file1) to other filelet C:\folder\file2). The below macro isnot my main macro. However if it works, I can make work may main macro. But the below one doesnt work, with same style how can I make it work? Thanks alot I try to copy "cell(1,1) of Sheet1 of C:\folder\file1" to "cell (1,1) of Sheet1 of C:\folder\file2" Sub macro1() F1 = "C:\folder\file1" F2 = "C:\folder\file2" F2.Sheets("Sheet1").Cells(1,1) = F1.Sheets("Sheet1").Cells(1,1) End Sub |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
copying cells from one file to another file
On 10 AÄŸustos, 13:18, Joel wrote:
Try these changes Sub CopyCells() F1Name = "C:\folder\file1" F2Name = "C:\folder\file2" Set F1 = Workbooks.Open(Filename:=F1Name) Set F2 = Workbooks.Open(Filename:=F2Name) 'this will not copy any formating F2.Sheets("Sheet1").Cells(1, 1) = F1.Sheets("Sheet1").Cells(1, 1) 'this will copy formating F1.Sheets("Sheet1").Cells(1, 1).Copy _ Â* Â*Destination:=F2.Sheets("Sheet1").Cells(1, 1) 'or copy multiple cells F1.Sheets("Sheet1").Range("A1:B10").Copy _ Â* Â*Destination:=F2.Sheets("Sheet1").Cells(1, 1) End Sub "oercim" wrote: Hello. I need help. I am not a profession VBA programmer. I want to create macro such that it will copy some cells from a file(let C: \folder\file1) to other filelet C:\folder\file2). The below macro Â*isnot my main macro. However if it works, I can make work may main macro. But the below one doesnt work, Â*with same style how can I Â*make it work? Thanks alot I try to copy Â*"cell(1,1) of Sheet1 of C:\folder\file1" Â*to Â*"cell (1,1) of Sheet1 of C:\folder\file2" Sub macro1() F1 = "C:\folder\file1" F2 = "C:\folder\file2" F2.Sheets("Sheet1").Cells(1,1) = F1.Sheets("Sheet1").Cells(1,1) End Sub I just want to copy values not the format or other things when I use my way in the same file copying from one sheet to another it works. For example Sub macro1() Sheets("Sheet2").Cells(1,1) = Sheets("Sheet1").Cells(1,1) End Sub Above one works fine fcopying cell(1,1) from Sheet1 to Sheet2. Cant I use use this type in copying from one file to anotjer file? thanks alot |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
copying cells from one file to another file
On 10 AÄŸustos, 13:18, Joel wrote:
Try these changes Sub CopyCells() F1Name = "C:\folder\file1" F2Name = "C:\folder\file2" Set F1 = Workbooks.Open(Filename:=F1Name) Set F2 = Workbooks.Open(Filename:=F2Name) 'this will not copy any formating F2.Sheets("Sheet1").Cells(1, 1) = F1.Sheets("Sheet1").Cells(1, 1) 'this will copy formating F1.Sheets("Sheet1").Cells(1, 1).Copy _ Â* Â*Destination:=F2.Sheets("Sheet1").Cells(1, 1) 'or copy multiple cells F1.Sheets("Sheet1").Range("A1:B10").Copy _ Â* Â*Destination:=F2.Sheets("Sheet1").Cells(1, 1) End Sub "oercim" wrote: Hello. I need help. I am not a profession VBA programmer. I want to create macro such that it will copy some cells from a file(let C: \folder\file1) to other filelet C:\folder\file2). The below macro Â*isnot my main macro. However if it works, I can make work may main macro. But the below one doesnt work, Â*with same style how can I Â*make it work? Thanks alot I try to copy Â*"cell(1,1) of Sheet1 of C:\folder\file1" Â*to Â*"cell (1,1) of Sheet1 of C:\folder\file2" Sub macro1() F1 = "C:\folder\file1" F2 = "C:\folder\file2" F2.Sheets("Sheet1").Cells(1,1) = F1.Sheets("Sheet1").Cells(1,1) End Sub Thanks alot. I did it. Again thanks alot. That was very helpful for me |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
copying cells from one file to another file
Sorry to confuse you. I just gave additional methods for copying. The only
problem with you code is the refereencing the other workbook. I assumed the workbooks were closed. I just realized the workbooks may be opened. Here is code assuming the workbooks were opened. Sub CopyCells() F1Name = "C:\folder\file1" F2Name = "C:\folder\file2" Set F1 = Workbooks(F1Name) Set F2 = Workbooks(F2Name) 'this will not copy any formating F2.Sheets("Sheet1").Cells(1, 1) = F1.Sheets("Sheet1").Cells(1, 1) 'this will copy formating F1.Sheets("Sheet1").Cells(1, 1).Copy _ Destination:=F2.Sheets("Sheet1").Cells(1, 1) 'or copy multiple cells F1.Sheets("Sheet1").Range("A1:B10").Copy _ Destination:=F2.Sheets("Sheet1").Cells(1, 1) End Sub "oercim" wrote: On 10 AÄŸustos, 13:18, Joel wrote: Try these changes Sub CopyCells() F1Name = "C:\folder\file1" F2Name = "C:\folder\file2" Set F1 = Workbooks.Open(Filename:=F1Name) Set F2 = Workbooks.Open(Filename:=F2Name) 'this will not copy any formating F2.Sheets("Sheet1").Cells(1, 1) = F1.Sheets("Sheet1").Cells(1, 1) 'this will copy formating F1.Sheets("Sheet1").Cells(1, 1).Copy _ Destination:=F2.Sheets("Sheet1").Cells(1, 1) 'or copy multiple cells F1.Sheets("Sheet1").Range("A1:B10").Copy _ Destination:=F2.Sheets("Sheet1").Cells(1, 1) End Sub "oercim" wrote: Hello. I need help. I am not a profession VBA programmer. I want to create macro such that it will copy some cells from a file(let C: \folder\file1) to other filelet C:\folder\file2). The below macro isnot my main macro. However if it works, I can make work may main macro. But the below one doesnt work, with same style how can I make it work? Thanks alot I try to copy "cell(1,1) of Sheet1 of C:\folder\file1" to "cell (1,1) of Sheet1 of C:\folder\file2" Sub macro1() F1 = "C:\folder\file1" F2 = "C:\folder\file2" F2.Sheets("Sheet1").Cells(1,1) = F1.Sheets("Sheet1").Cells(1,1) End Sub I just want to copy values not the format or other things when I use my way in the same file copying from one sheet to another it works. For example Sub macro1() Sheets("Sheet2").Cells(1,1) = Sheets("Sheet1").Cells(1,1) End Sub Above one works fine fcopying cell(1,1) from Sheet1 to Sheet2. Cant I use use this type in copying from one file to anotjer file? thanks alot |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Error Copying File or Folder message when copying file to CD | Excel Programming | |||
reading txt file and copying the lines in new excel file | Excel Programming | |||
Copying the Editing in one file to Another opened XLS file | Excel Worksheet Functions | |||
Copying rows from one file and pasting into a new file | Excel Programming | |||
Copying rows from one file and pasting into a new file | Excel Programming |