Bouton double message

Bonjour

Voila j'ai un USF avec un bouton et j'aimerais lui associer deux messages "Ôter le menu et Rétablir le menu"

Je vous remercie d'avance

Cordialement

Max

Bonjour,

A essayer :

Private Sub CommandButton3_Click()
With Application
If .DisplayFullScreen = True Then
    .DisplayFullScreen = False
Else: .DisplayFullScreen = True
End If
End With
End Sub

Si ok, clique sur V vert à coté du bouton EDITER pour cloturer le fil

Amicalement

Bonjour Dan

Pour le code nickel...! est-il possible d'avoir sur le bouton un double message c'est a dire "Ôter le menu ou Rétablir le menu"

Un grand merci d'avance

Max

re,

essaie ceci :

Private Sub CommandButton3_Click()
With Application
If .DisplayFullScreen = True Then
    .DisplayFullScreen = False: Me.CommandButton3.Caption = "MASQUER"
Else: .DisplayFullScreen = True: Me.CommandButton3.Caption = "AFFICHER"
End If
End With

Amicalement

Re,

Je te remercie beaucoup Nickel

@+

Max