eccoti...
nel foglio di origine, dove c'è l'elenco delle città con i collegamenti ipertestuali (ad esempoi "foglio 1") clicca nel cavalierino in basso con il nome del foglio e scegli "visualizza codice"
nel editor VBA che ti si apre aggiungi le seguenti righe:
codice:
Dim ValoreCitta As String
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
FoglioDest = "citta"
Sheets(FoglioDest).Cells(2, 1).Value = ValoreCitta
End Sub
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Hyperlinks.Count <> 0 Then
ValoreCitta = Target.Value
End If
End Sub
Il "mio" secondo foglio (il foglio destinazione) ha il nome "citta", imposta il valore della variabile FoglioDest con il nome del tuo foglio di lavoro di destinazione
se non ho capito male la tua richiesta dovrebbe fungere al caso tuo
facci sapè...
ciao
L.