Runtime error 9 Script out of range

Dear Mr. Mumps,
I have created a thread for stock updatation and mentioned the below link of it.
https://www.excelforum.com/excel-pro...le-sheets.html
But when i am using this code to a new workbook it will not showing error message i.e. Subscript out of Range.
Kindly help. Beloe mentioned the code details.

Please Login or Register  to view this content.

Have put the code tag as advised. Thanks.

Administrative Note:

We would very much like to help you with your query, however you need to include code tags around your code.

Please take a moment to add the tags. Posting code between tags makes your code much easier to read and copy for testing, and it also maintains VBA formatting.

Please see Forum Rule #2 about code tags and adjust accordingly. Click on Edit to open your post, then highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found here

(Note: this change is not optional. No help to be offered until this moderation request has been fulfilled.)

What line errors?

It looks as though the sheet(s) defined in column 1 do not exist.

Please Login or Register  to view this content.

I don't get an error.

I must have been opening a previous version, I get an error now.

The code requires sheet names to be in column A

See post #7 explanation