ciao,
ed un saluto a Cromagno e Marco
![[SM=g27811]](https://im0.freeforumzone.it/up/0/11/10151015.gif)
Una alternativa da inserire nel modulo del foglio interessato
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim sh As String
sh = Range("a1").Value
With Sheets(sh)
.Activate
End With
End Sub ciao
Frank
Stretta la foglia, larga la via, dite la vostra che ho detto la mia.
Excel 2007 forse anche 2013 ... 2021 ... 365 e future...