VBA Copy range

[jakobt]

In a current workbook. Want to copy a range to another workbook. Error message: Compile error: .Copy Method or member not found?

Sub Select_current_region()


Range("A1:I132").Select
Selection.Copy Destination:=Workbooks("AB Europe Gmbh - BS Rec Sep.xlsm").Worksheets("TB Sep").Range("A1")




End Sub

 

[James006]

Hello,

There is no need to use Select ...

You just have to make sure all of your spellings are correct ...
and that the destination workbook is not closed ...

[COLOR=#333333]Sub Select_current_region()[/COLOR]
[COLOR=#333333]Range("A1:I132")[/COLOR][COLOR=#333333].Copy Destination:=Workbooks("AB Europe Gmbh - BS Rec Sep.xlsm").Worksheets("TB Sep").Range("A1")[/COLOR]
[COLOR=#333333]End Sub[/COLOR]

 

[gallen]

Check your spellings. I just tested it by creating a workbook and worksheet with those names and it worked fine (ensuring the workbook is open)

Also you can do that in 1 line. Using selection is rarely a good option

Range("A1:I132").Copy Destination:=Workbooks("AB Europe Gmbh - BS Rec Sep.xlsm").Worksheets("TB Sep").Range("A1")

 

[jakobt]

It says run time error 9: Subscript out of range.

 

[James006]

It says run time error 9: Subscript out of range.

As stated previously by gallen and myself ... your spellings are not absolutely identical ... !!!

The " Run time error 9 : subscript out of range" ... says it all ... :wink:

 

[MARK858]

Just to add to what James006 has stated, check your spaces are correct and also that you haven't got a leading or trailing space in both your Workbook and Sheet name.