Subscript Error in previously working code.

**pjbassdc** · 04-15-2014, 10:30 AM

Help please. My workgroup just recently upgraded to Windows 7 from XP. After doing so and reinstalling Office 2010 I have been having various issues with my tech form project. It had been working flawlessly until the upgrade.

The issue I need to get resolved in a hurry is this subscript out of range.

Please Login or Register  to view this content.

It keeps flagging on this line:

Lr = lastrow(Workbooks("Monthly Log Sheet.xlsx").Sheets("Sheet 1")) + 1

I have not changed anything from my previous version and the file locations have not changed. Anyone have any ideas?
I have been into the Trust Center to allow macros and active X.

Patrick

**Norie** · 04-15-2014, 10:34 AM

Patrick

Does the workbook 'Monthly Log Sheet.xlsx' have a sheet called 'Sheet 1', with the space?

Also, have you tried Workbooks("Monthly Log Sheet")?

PS What's lastrow? A function? An array?

**pjbassdc** · 04-15-2014, 10:59 AM

Thank you for the fast reply Norie. To answer the question, yes Lastrow is a function. After looking into the sheet names a bit more closely, the space in the name was the issue. Pesky little spaces

. I have since corrected that and it appears to be working now. Thank you so much for this and the other bits of help you have given over the last year or so. Always good stuff from you.

Patrick