Activate sheet based on cell value

[redspanna]

Hi all

I'm using this line of code to activate a workbook sheet

Worksheets(Worksheets("Front").Range("A1").Value).Activate

So the 'value' found in cell ref A1 of the Front sheet will always be a number between 1 and 31
The workbook contains 31 sheets, named 1,2,3,4,5, etc etc thru to 31

I want the code above to activate the sheet name with the same value found in A1

For example if A1 holds the number 6 , I would like the sheet that is also called '6' to be activated, NOT SHEET6, as sheet6 may actually be called '16'

hope this makes sense and appreciate any help

Kind regards

 

[Fluff]

Hia
Change .value to .text

Worksheets(Worksheets("Front").Range("A1").Text).Activate

 

[JoeMo]

The value in A1 is being read as a number and VBA assumes that's a sheet index rather than a sheet name. You can either change Value to Text (as suggested in post #2 ) or you can coerce the value to text like this:

Sheets(CStr(Sheets("Front").Range("A1").Value)).Activate

 

[redspanna]

Thanks guys for suggestions - great help

 

[Fluff]

Glad we could help & thanks for the feedback