How to properly qualify a range

Hi,

I have written some code to export queries from access into excel and then apply some formatting.

Please Login or Register  to view this content.

Now this works perfectly fine but I know it isn't quite good practice.

In the first with ws1 section I understand that the lastrow = ...part works because it is in the currently active sheet. And then later down I have had to put some formatting into the If intcurrent = 2 and If intcurrent = 3 sections because I get an error if I bring them up under the with ws2 and with ws3 sections and use the lastrow reference again because, one it is referencing the first sheet, and 2 because there is no object properly set.

So my question is how can I neaten this up and what is the code for properly setting references to the ranges. Ideally i'd define the range Range("A1").End(xlDown).Row for each worksheet.

Thanks in advance!

Please Login or Register  to view this content.

Should be:

Please Login or Register  to view this content.

The dot links the range to ws1


Regards, TMS

Please Login or Register  to view this content.

Look at it again ... what is missing? A clue: same answer as last time.

Regards, TMS

You're welcome.



If you are satisfied with the solution(s) provided, please mark your thread as Solved.


New quick method:
Select Thread Tools-> Mark thread as Solved. To undo, select Thread Tools-> Mark thread as Unsolved.

Or you can use this way:

How to mark a thread Solved
Go to the first post
Click edit
Click Go Advanced
Just below the word Title you will see a dropdown with the word No prefix.
Change to Solved
Click Save


You may also want to consider thanking those people who helped you by clicking on the little star at the bottom left of their reply to your question.