This Copy instruction getting Subscript out of Range error 9 - 1st 2 of these 3 stmts worked great

Al Bailey 1

Workbooks.Open "E:\POS2INV\InvSys.xlsm" 'open rcvr fldr&wkbk, empty rcvr sheet1, & copy sndr sheet to rcvr sheet
Workbooks("InvSys").Worksheets("Sheet1").Cells.ClearContents
Workbooks("getPOSplants").Worksheets("pivot").Range("A1:L" & lastrow).Copy _
Workbooks("InvSys").Worksheets("Sheet1").Range("A1")

Emily Hua-MSFT 27,636 Reputation points

2022-02-21T06:16:55.467+00:00

Hi @Al Bailey
As your issue is more related to VBA, I would add a tag "office-vba-dev".

Thanks for your understanding.
Viorel 116.6K Reputation points

2022-02-21T08:39:42.6+00:00

Maybe "getPOSplants" or "pivot" does not exist? Split the line to several instructions to determine the cause.

1 answer

Anonymous

2022-02-20T21:09:34.043+00:00

Set a breakpoint and check the value of lastrow is valid and expected.
Please sign in to rate this answer.

0 comments No comments
Sign in to comment

Use comments to ask for clarification, additional information, or improvements to the question.

Share via

This Copy instruction getting Subscript out of Range error 9 - 1st 2 of these 3 stmts worked great

1 answer

Your answer