For some mysetious reason I am getting an error around the following line of code:
Set workingsrange = Sheets(3).Range(Range("b2"), Range("e9"))
"Application-defined or object-defined error"
Any idea?
For some mysetious reason I am getting an error around the following line of code:
Set workingsrange = Sheets(3).Range(Range("b2"), Range("e9"))
"Application-defined or object-defined error"
Any idea?
Solved:
Sheets(3).activate
set workingsrange = Range(Range("b2"), Range("e9"))
Rather than Select/Activate a sheet, you can set a good solid reference to the range you want. This way, it doesn't matter which sheet happens to be active.
Hope that helps,With ThisWorkbook.Worksheets(3) Set workingsrange = Range(.Range("b2"), .Range("e9")) End With
Mark
[VBA]Set workingsrange = Sheets(3).Range(Sheets(3).Range("b2"), Sheets(3).Range("e9"))
[/VBA]
For a bit of variety
[VBA]Set workingsrange = Sheets(3).Range("b2").Resize(8, 4)
[/VBA]
MVP (Excel 2008-2010)
Post a workbook with sample data and layout if you want a quicker solution.
To help indent your macros try Smart Indent
Please remember to mark threads 'Solved'