Amélioration et rectification d'un code en VBA

Salut à tous,

J'ai créé un code (qui ne marche pas encore pour le moment) mais dont l'idée principale serait que

sur ma Feuil1, si je double clique sur une cellule (qui porterait le nom d'une de mes feuilles) de la colonne B,

alors suite au double clique, je me retrouverai sur la feuille souhaitée.

voici mon code (me manque le fait de me diriger vers la feuille) :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Target.Column = 2 Then

Target = Target.Cells

End If

Target.Offset(1, 0).Select

End Sub

Merci d'avance pour toute aide, en espérant avoir été clair dans ma demande.

Cordialement

J'ai trouvé la solution en testant un peu.

Je donne la formule si cela peut intéresser d'autres personnes :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)

If Not Intersect([B1:B20], Target) Is Nothing Then

Choix = Target

Worksheets(Choix).Activate

End If

End Sub

Rechercher des sujets similaires à "amelioration rectification code vba"