Rendre inactif des boutons active x

Bonjour,

Mon document est protégé par un mot de passe, chaque personne qui entre possède un niveau d'accès qui peut différer d'une personne à une autre.

En fonction du niveau d'accès, je cache plus ou moins de feuilles, plus ou moins de userforms....

Sur une feuille et non pas un formulaire, je possede deux boutons.

Je souhaite pouvoir rendre inactif ces boutons à l'ouverture du ficher en fonction du niveau d'acces de la personne qui entre sur le document ( je cherche juste le code VBA permettant de rendre inactif ces deux boutons).

Malgré mes recherche sur le net je n'ai pour le moment pas encore trouvé mon bonheur donc merci d'avance pour le coup de main

Bonjour

A tester

' Invisible
Sub test()
  Sheets("Feuil1").CommandButton1.Visible = False
  Sheets("Feuil1").CommandButton2.Visible = False
End Sub
' Visible
Sub truc()
  Sheets("Feuil1").CommandButton1.Visible = True
  Sheets("Feuil1").CommandButton2.Visible = True
End Sub

' ******************************************
' Visible mais pas actif
Sub Test1()
  Sheets("Feuil1").CommandButton1.Enabled = False
  Sheets("Feuil1").CommandButton2.Enabled = False
End Sub
' Actif
Sub truc1()
  Sheets("Feuil1").CommandButton1.Enabled = True
  Sheets("Feuil1").CommandButton2.Enabled = True
End Sub

ok ! je crois que je me suis bien compliqué la vie quand je vois la réponse... beau récapitulatif merci beaucoup 8)

Rechercher des sujets similaires à "rendre inactif boutons active"