If myVar = 1 Then
Worksheets("Sheet1").Activate
ElseIf myVar = 7 Then
Worksheets("Sheet2").Activate
ElseIf myVar = 11 Then
Worksheets("Sheet3").Activate
'etc.
End If
or using Case
Select Case myVar
Case 1 : Worksheets("Sheet1").Activate
Case 7 : Worksheets("Sheet2").Activate
Case 11 : Worksheets("Sheet3").Activate
'etc.
End Select
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
Sun said:
Help! I cant figure out how to use the If-Then-Else Control Function. I