sheets.select with reference to Cells value
Hi,
I am designing vba macro where i have to select a particular sheets
depending of name in a cell ("A12").
"A12" value is always a text. its value change from day to day.
The sheet with "A12" value as name does exist in the workbook
I tried this macro based on the newsgroup archives, but it copies A12
value on "index" sheets rather than "A12" name sheet.
Any idea how to select this sheet?
Sub test()
Dim i As Integer
Sheets("index").Select
namsh = Range("A12").Value
For i = 1 To Sheets.Count
If Sheets(i).Name = namsh Then
Sheets(i).Select
End If
Next i
Range("I1").Value = namsh
End Sub
|