XL 2013 onglet apparait selon un résultat + message si la case est selectionné

[306255]

Bonjour à tous,

J'aimerais que les différents onglets apparaisse uniquement quand le résultat obtenu correspond à l'onglet (je devrais avoir une quinzaine d'onglet en tout)

J'aimerais que lorsque certaine case sont cochés un message apparait (le message sera différent en fonction de la case sélectionné)

Merci d'avance pour votre aide

 

[Fred0o]

Bonjour 306255

Voir ma proposition en piece jointe. Ce sera bien sur a adapter a votre fichier reel.

 

[Fred0o]

Re-bonjour

Suite a notre echange en MP, voici le code a mettre dans le fichier que tu m'as fait passer

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ws As Worksheet, NF As String
    If Not Intersect(Target, [C5:C7]) Is Nothing Then
        Application.ScreenUpdating = False
        NF = Worksheets("données").[D11]
        For Each ws In ActiveWorkbook.Worksheets
            On Error Resume Next
            Worksheets(NF).Visible = True
            If ws.Name <> "interface" And ws.Name <> NF Then ws.Visible = False
            On Error GoTo 0
        Next ws
        Application.ScreenUpdating = False
    End If
End Sub

Dans la feuille "données" :

Formule en C11 :

=EQUIV(interface!$C$5;données!$B$3:$B$4;0)*10+EQUIV(interface!$C$7;données!$D$3:$D$4;0)

Formule en D11 :

=RECHERCHEV($C$11;$C$6:$D$9;2;FAUX)

 

[Fred0o]

Bonjour 306255

Re-bonjour Fred,

Je viens de rentrer et faire un essai ça marche du tonnerre, tu es super sympa et efficace, je rencontre juste un souci en début d'enregistrement l'interface et vide et donc j'ai une erreur dans le code (débogage...) aurais tu une dernière astuce

Merci encore

Merci de continuer la conversation sur ce fil et pas en prive.
Je viens de regarder la dernière mise a jour de ton fichier et je ne comprend pas ce qui pose problème.