Criar Indice

[rdavy]

Preciso de ajuda para criar uma macro que faça com que ao digitar o nome da aba em uma celula da primeira planilha e dar enter,

me mande para essa aba automaticamente.

eu estava pensando em algo do tipo

Application.Goto Reference:="copia texto da celula"

ou seja... minha referencia seria a informação digitada nessa celula.

[JoséA]

Private Sub Worksheet_Change(ByVal Target As Range)
Dim Indice
Indice = Plan1.Range("A1").Value
    Sheets(Indice).Select

End Sub