View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
[email protected] MPotok@gmail.com is offline
external usenet poster
 
Posts: 2
Default 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!