Désactiver boutons sous condition

[matiousky]

Bonjour,

Je voudrai à l'ouverture de mon fichier, désactiver plusieurs bouton en fonction d'une condition: voici ma formule:

Sub workbook_open()

If Range("C42").Value > 45 Then

MsgBox "Votre version est obsolète pour toute nouvelle simulation, veuillez vous rapprocher de Mathieu"

Que dois-je rajouter pour si C42 > 45 alors mes boutons soit inutilisables?

Merci de votre aide,

Mat

 

[Catrice]

Re : Désactiver boutons sous condition

Bonjour,

Par exemple :
If Range("C42").Value > 45 Then CommandButton1.Enabled = False
ou
If Range("C42").Value > 45 Then CommandButton1.Visible = False