Bonjour, je viens vers vous car j'aimerai créer un lien direct en changeant une cellule. Exemple j'aimerai écrire 15 dans la cellule B6 et une fois valider il m'envoie directement à la feuille 15 et ainsi de suite.
je vous ai mis le fichier joins pour que vous comprenez plus rapidement.
Il s'agit d'une liste déroulante pour info.
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
If Not (Application.Intersect(Range("B6"), Target) Is Nothing) Then _
ThisWorkbook.Sheets(Target.Text).Activate
End Sub