XL 2010 CommandButton par défaut

Eric C

XLDnaute Barbatruc

• 18 Août 2022

• #2

Bonjour le forum
Bonjour kadelmalin

A tester

 

Pièces jointes

• Clas_Tst 1.xlsm

  21.4 KB · Affichages: 10

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 18 Août 2022

• #3

Bonjour le forum, @kadelmalin , @Eric C

Ce code devrait le faire. A mettre dans le module du Userform:

VB:

Private Sub UserForm_Activate()
   CommandButton1.Visible = [B3] = 1
   CommandButton2.Visible = [B3] = 2
End Sub

 

Vote positif 0 Vote négatif

Eric C

XLDnaute Barbatruc

• 18 Août 2022

• #4

Re le fil,
Bonjour mapomme : Pourquoi faut il toujours que j'en fasse de trop (ma devise : pourquoi faire simple quand on peut faire compliqué - Ah oui, je dois faire partie du clan de notre ami Lionel (Usine à Gaz que je salue) -
Bonne après-midi à toutes & à tous
@+ Eric c

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 18 Août 2022

• #5

Bonjour @Eric C

Eric C à dit:

Ah oui, je dois faire partie du clan de notre ami Lionel (Usine à Gaz que je salue

Cliquez pour agrandir...

Tu as encore de la marge (j'en ai fait des pires dans le genre pourquoi faire simple...)

Un grand bonjour à @Usine à gaz

 

Dernière édition: 18 Août 2022

Vote positif 0 Vote négatif

kadelmalin

XLDnaute Occasionnel

• 18 Août 2022

• #6

Merci beaucoup à vous deux.

 

Vote positif 0 Vote négatif

kadelmalin

XLDnaute Occasionnel

• 18 Août 2022

• #7

Au fait ce n'est pas l'option 'visible' que je voulais mais l'option 'default' c'est à dire que le bouton sera sélectionné à l'ouverture de l'userform.

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 18 Août 2022

• #8

kadelmalin à dit:

Au fait ce n'est pas l'option 'visible' que je voulais mais l'option 'default' c'est à dire que le bouton sera sélectionné à l'ouverture de l'userform.

Cliquez pour agrandir...

Dans ce cas, essayez ce code :

VB:

Private Sub UserForm_Initialize()
   Controls("Commandbutton" & [B3]).SetFocus
End Sub

 

Vote positif 0 Vote négatif

kadelmalin

XLDnaute Occasionnel

• 19 Août 2022

• #9

Bjr mapomme, je vous remercie beaucoup.

 

Vote positif 0 Vote négatif