rendre invisible des boutons dans l'USF2

Bonsoir Petchy,


Tu peux peut-être essayer :

Private Sub CommandButton5_Click()
   With aaa
      .CommandButton1.Visible = False
      .CommandButton12.Visible = False
      .CommandButton13.Visible = False
      .Frame3.Visible = False
      .Show
   End With
End Sub

Cela dit, si tu détermines les propriétés "visible" de ces contrôles à "False" directement dans l'environnement de développement VBE, ces contrôles seront invisibles à chaque ouverture du Userform "aaa" sans que tu sois obligé de le définir dans le code VBA.


Cordialement.

Didier_mDF

bonsoir,


AMHA, il serait opportun d'appliquer la méthode repaint à ton USF2.
Après
UserForm2.CommandButton1.Visible = False
...
UserForm2.CommandButton3.Visible = False
UserForm2.Repaint

devrait mettre à jour l'affichage de ta USF2

Ca marche ?

Rai

Re

un grand merci à tous les 2 pour vos codes,

@plus
petchy

Bonsoir à tous,

Voici une idée un peu tordu je vous l'accorde.
Dans une même USF est il possible en partant de vos code de remplacer des boutons par d'autres.

Merci d'avance

Akeya06