If the sheet name is the branch number, you could use

Worksheets(Activecell.Value).Activate


If not you could use something like

Select Case Actvecell.Value
Case 1: Worksheets("Western").Activate
Case 2: Worksheets("Mid").Activate
'etc
End Select

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Dumbguy" wrote in message
...
How can I select multiple sheets without coding the sheetnames?
For instance, I have 10 branches servicing 50 states.
Branch 1 serves CA and AZ, Branch 2 serves UT,NV,MT,ID, etc.
I have a sheet with a lookup file that looks like this:
1 AZ
1 CA
2 UT
2 NV
2 MT
How can I select these sheets in an array upon change of the branch
number? Using the recorder, it always wants to hardcode the sheet name. I
would like to save all the states and a summary page for each branch.

Thanks!