Discussion :

[neninio31]

Bonjour
j'ai crée une userform "saisie" et la validation de cette "saisie" appelle une autre userform " mot de passe"

le probleme est que si l'utilisateur ferme avec la croix la userform "mot de passe " la macro de la userform "saisie " continue

est il possible de rentrer closemode en parametre du genre si la userform "mot de passe" est fermée alors ca sort de la macro de la userform "saisie"


merci

[laetitia]

bonsoir neninio31 le forum

pour empecher de fermer par la croix

Code :

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

1
2
3
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then Cancel = True
End Sub

[neninio31]

Re

empecher la fermeture par la croix j'ai deja fait
ajouter un bouton j'ai deja fait mais en fait la seule solution que j'avais trouvé mais qui ne me va pas c'est de mettre

Code :

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

1
2
3
4
5
6
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then 
 
End 
End If
End Sub

mais le end me vire carrement tout alors que je veux pas que la 1ere userform avec des données ne se masque

en fait je vaux pouvoir piloter la macro de la userform 1 a partir de la fermeture de la userform2
c 'est a dire piloter le Exit Sub de la userform1 a partir de la croix de la userform2

est ce possible ???

[LeForestier]

Bonjour neninio31, laetitia
C'est justement la question que je me posais,
Il faut pouvoir gérer le refu de l'utilisateur.
Mettre une variable dans un module public par exemple

Code :

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

Public Valider As Boolean

Quand l'utilisateur rentre le bon code mettre cette varaible à True
et quand le UF code est fermer, tester cette variable et agir en fonction de son contenu.
A+

[neninio31]

Re
un code du genre

Code :

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

1
2
3
4
5
6
7
8
9
10
Public Valider As Boolean
 
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
 
 
If CloseMode = vbFormControlMenu Then 
 
Valider = True
End If
End Sub

et ensuite

Code :

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

1
2
3
4
5
If valider = true Then 
Exit Sub 
Else
 
'le reste de la macro

mais ou placer

Code :

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

Public Valider As Boolean

[LeForestier]

Tu a bien compris le principe.
La variable public doit être dans un module..... public
Genre Module1, pour être visible dans toute l'application.
A+
Edit : ajouter classeur exemple

[neninio31]

Re
ça marche à la perfection merci beaucoup

maintenant mon dernier problème

le plus important !!

affectation dynamique de macro a des boutons rendez vous dans la discussion pour me sauver la vie

merci