Ouverture d'une feuille à partir d'une valeur dans une cellule

Bonjour à tous,

J'aurais besoin qu'on aide a concevoir un code VBA afin que je puisse ouvrir une feuille à partir d'une valeur dans une cellule. Je joins le fichier Exemple.xlsm.

Dans cet exemple, le nombre et le nom des feuilles sont variables et le nombre de chiffre dans la colonne "B" de la feuille "BDDE_CAM" est variable également.

Par exemple, si je clique sur la cellule "B14" de la feuille "BDDE_CAM", la feuille "001_ECP-3" doit s'ouvrir. Si je clique sur la cellule "B41", la feuille "004_PC-3" doit s'ouvrir, etc...

Ainsi, les chiffres dans la colonne "B" de la feuille "BDDE_CAM", sont liés aux chiffres des cellules "C8" dans les autres feuilles.

En vous remerciant par avance pour votre précieuse aide.

Salutations,

Renaud D.

Bonsoir

Par exemple, si je clique sur la cellule "B14" de la feuille "BDDE_CAM", la feuille "001_ECP-3" doit s'ouvrir. Si je clique sur la cellule "B41", la feuille "004_PC-3" doit s'ouvrir, etc...

Essayez avec ce code

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim sh As Object
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("B10:B" & Range("B" & Rows.Count).End(xlUp).Row)) Is Nothing Then
    For Each sh In Sheets
        If Left(sh.Name, 3) = Left(Target.Value, 3) Then sh.Activate
    Next
End If
End Sub

Cordialement

Bonjour

Bonjour à tous

Une variante

Bye !

Merci beaucoup gmb & Dan pour votre aide.

Vos code VBA fonctionnent à merveille.

Sincères salutations,

Renaud D.