Paste cells from one workbook to another
Hi all,
I'm new to VBA programming and I have what should be a simple question
for you experts!
Basically, I have 2 workbooks and I want to copy a range of cells from
Workbook A and paste them in Workbook B. I am getting a 'subscript out
of range' error when I try to pase and I cannot figure out why. Below
you will find the code that I am using:
Set wbDest = ActiveWorkbook
Set wbSource = Workbooks.Open(cdbBrowse.Filename)
wbSource.Worksheets("Sheet1").Range("A9:E13").Copy
Destination:=wbDest.Worksheets("Sheet1").Range("A9 :E13")
I know the problem is something with the Destination because if I just
do the Copy statement with no destination, I get no error.
Also, right now I have some other code in place that inserts blank
lines prior to doing the paste. Is there a way that I can just insert
the copied cells???
Thank you so much in advance for your help!
|