Code d'une colonne renvoie à une feuille du classeur en VBA

Bonjour,

Je débute les apprentissages VBA. Je souhaiterai lorsque je clique sur le code d'une colonne B que cela renvoie à la feuille correspondante.

Si je clique sur un autre code , la feuille précédente se ferme.

Et si la feuille correspondante au code n'existe pas que le message box "procédure en cours" apparaît. Merci par avance pour l'aide que vous pourrez m'apporter.

Blandine

Bonjour Blandilai et

Une petite présentation ICI serait la bienvenue

Si vous ne l'avez pas encore fait, je vous invite à lire la charte du forum [A LIRE AVANT DE POSTER] ainsi que ses fonctionnalités
qui vous aideront dans vos demandes et réponses sur ce forum.

Concernant votre demande, voici votre fichier modifié

Merci de votre participation

Cordialement

Bonjour Bruno,

Ma présentation est faite :-D, et la charte est lue.

Merci pour le travail effectué, c'est fantastique. Par contre la feuille attendue apparait en bas, mais ne s'affiche comme souhaité. Que dois-je ajouter dans le script, svp

Merci encore pour votre aide.

Blandine

Bonsoir Blandilai,

Il manque le "Activate" dans le code

Option Explicit

Dim MemNom As String

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
  If Not Application.Intersect(Target, Range("B:B")) Is Nothing Then
    If Existe(Target.Value) Then
      If MemNom <> "" Then
        Sheets(MemNom).Visible = xlSheetHidden
      End If
      With Sheets(Target.Value)
        .Visible = xlSheetVisible
        .Activate
      End With
      MemNom = Target.Value
    Else
      If MemNom <> "" Then
        Sheets(MemNom).Visible = xlSheetHidden
      End If
      MsgBox "Procédure en cours"
    End If
  End If
End Sub

A+

Merci Bruno,

C'est en effet ce qui me manquait, merci beaucoup.

Blandine