Worksheets(x).Select Error

[aadil_1408]

Hi,

I am trying to select multiple sheets using the following code.

    Dim x As Integer
    ThisWorkbook.Worksheets(3).Select
    For x = 3 To ThisWorkbook.Worksheets.count
        Worksheets(x).Select (False)
    Next x

Although it is a common code it does not work with the later versions of excel as other people online have encountered similar issues. Is there another way to selects all sheets except first two?

Thanks and Regards,
Aadil Khan

 

[RoryA]

Your count should really start at 4, since you already have the third sheet selected.

 

[RoryA]

Silly question, the sheets are all visible aren't they?

I was just about to ask the same thing.

 

[aadil_1408]

Does it work when you comment out the same lines that I did, i.e. the path and the saveas lines?
Do you have any protection either on the Workbook or the Worksheets?

Does it work when you comment out the same lines that I did, i.e. the path and the saveas lines?
no it does not
Do you have any protection either on the Workbook or the Worksheets?
No i do not
The sheets are all visible aren't they?
Yes they are all visible

 

[MARK858]

With Rory's code when the code errors and you hover your mouse over the v in the highlighted line what does it show? and have you changed it to 4 as Rory has suggested?

 

[aadil_1408]

With Rory's code when the code errors and you hover your mouse over the v in the highlighted line what does it show? and have you changed it to 4 as Rory has suggested?

Ya it worked Rory, Thanks a lot. When I hovered over it showed outta range. That was a careless mistake from my part. Sorry for wasting your time on this. I appreciate the solutions that you have sent me and thanks for your time.