activating the previous sheet

[bramnizzle]

I am trying to activate the previous sheet in my code. My macro does
some code from the current sheet but then needs to pull some
information from the previous sheet. I get an error when I insert the
line
ActiveSheet.Previous.Select
Is this not correct?

 

[JLGWhiz]

It worked for me. What error did you get?

 

[bramnizzle]

It worked for me. What error did you get?

I changed things around...I think it is because my previous sheet was
hidden.

 

[bramnizzle]

It worked for me. What error did you get?

The previous sheet was a hidden sheet. I think that is why it would
not work. I inserted
ActiveSheet.Previous.Visible = True
ActiveSheet.Previous.Select
and I didn't get an error...however, my code did not do what I wanted
it to. Back to the drawing board!

 

[Dave Peterson]

First, you don't usually have to .select or .activate a sheet to work on it.

But this may do what you want:

Option Explicit
Sub testme()
Dim sCtr As Long
Dim FoundIt As Boolean
FoundIt = False
For sCtr = ActiveSheet.Index - 1 To 1 Step -1
If Sheets(sCtr).Visible = True Then
Sheets(sCtr).Select
FoundIt = True
Exit For
End If
Next sCtr

If FoundIt = False Then
MsgBox "Error showing previous sheet"
End If
End Sub