Discussion :

[aguerriera]

Alors voilà..
J'ai Donc 6 boutons, un pour ajouter un collaborateur dans une feuille Excel(Feuil4), Pour ajouter une semaine(Feuil4), Pour atteindre une semaine(que l'on a créé), Puis deux autres qui n'ont pas d'importance.

Et j'ai un bouton identifié, celui-là vous propose de vous identifier.

J'aimerais pouvoir bloquer mon bouton tant que l’utilisateur ne s'est pas identifier.

Nous avons comme nom dans la feuil4 : toto, bay, charles.(Ce ne sont pas les vrais noms bien sur)

Donc premier cas :
- L'utilisateur met "tutu"(Il cherche dans la feuil4 si ce nom existe) = Il ne trouve pas, et la j'aimerais que les boutons restes bloquer.

Deuxième cas :
- L'utilisateur met "toto"(Il cherche dans la feuil4 et ce nom existe) = Il trouve, et la j'aimerais que tout les autres boutons ne soit plus bloquer.



Je ne sais pas comment faire, auriez-vous une idée ?

Merci d'avance.

[JahExodus]

Bonjour,

ce sont des boutons sur un UserForm ou sur des feuilles Excel ?

[pijaku]

Bonjour,

S'il s'agit de contrôles ActiveX, regarde du côté de la propriété Enabled et/ou Visible...

[aguerriera]

C'est un contrôle de formulaire, et c'est sur une feuille Excel

[Marc-L]

Bonjour,

il suffit pourtant juste de consulter les propriétés de l'objet Shape dans l'aide VBA interne !
Cela a l'air plutôt limité, jouer par exemple avec la propriété Visible …

Sinon avec un peu de jugeote pour simuler la propriété Enabled comme dans un UserForm ou un bouton ActiveX,
définir par défaut la couleur du texte du bouton en gris clair, une fois les conditions remplies passer la couleur en noir
et enfin dans le code associé au bouton juste tester sa couleur …

___________________________________________________________________________________________________________

Je suis Paris, Egypte, Stockholm, London, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[aguerriera]

Ce que vous me dites m’intéresse mais comment faire ?

Quand toutes les conditions sont remplies activer tous les autres boutons. En gros c'est ça, mais comment faire ?

[Marc-L]

Soit via la propriété Visible soit en jouant sur la couleur du bouton par exemple
soit encore dans le code associé au bouton en contrôlant directement si les conditions sont remplies …

[aguerriera]

Si par exemple, toute les conditions du Bouton X sont remplis alors activer le bouton Y et Z.

Vous pourriez me donner un exemple de code ?

[pijaku]

Autre possibilité (salut Marc) avec une variable Booléenne :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
Public TousBloqués As Boolean
 
Sub Bouton1_Cliquer()
TousBloqués = True
End Sub
 
Sub Bouton2_Cliquer()
If TousBloqués Then Exit Sub
MsgBox "toto"
End Sub
 
Sub Bouton3_Cliquer()
If TousBloqués Then Exit Sub
MsgBox "titi"
End Sub
 
Sub Bouton4_Cliquer()
TousBloqués = False
End Sub

Variable à initialiser dans le Workbook_Open() également.