deux userform dans un meme onglet , comment faire svp!

[rayhaaana]

Bonjour le forum,

J'ai un tableau où chaque cellule doit afficher une userform avec un boutton "valider"
j'ai fais la première et j'ai configuré le boutton. la deuxième userform marche mais le boutton valider non ,
voici mon code :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$E$4" Then
Target.Value = ""
Load UserForm1
UserForm1.Show
End If
If Target.Address = "$E$5" Then
Target.Value = ""
Load UserForm2
UserForm2.Show
End If

End Sub

Je suis très débutante , merci de m'expliquer étape par étape svp

 

[Pierrot93]

Re : deux userform dans un meme onglet , comment faire svp!

Bonjour,

peut être qu'un tout petit fichier en pièce jointe ne representant que le problème posé nous aiderait à t'aider....

bon après midi
@+

 

[rayhaaana]

Re : deux userform dans un meme onglet , comment faire svp!

Bonjour,

Voici un exemple en pièce jointe. Je veux créer des cellules qui affiches des listes à multiples choix. La première cellule fonctionne mais la deuxième n'affiche rien.
Pour la première userform1 j'ai cliqué droit sur "feuil1" et dans "visualiser le code", j'ai rentré le code suivant :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$C$4" Then
Target.Value = ""
Load UserForm1
UserForm1.Show
End If
End Sub

Comment faire pour la userform2 svp? merci d'avance

 

[Pierrot93]

Re : deux userform dans un meme onglet , comment faire svp!

Bonjour,

vois rien dans ton fichier qui lancerait l'usf 2.... par contre dans son module (UserForm2), je vois ceci :

UserForm1.Hide
Unload UserForm1

sans doute remplacer "UserForm1" par "UserForm2"....

bon après midi
@+

 

[tashiqi]

Re : deux userform dans un meme onglet , comment faire svp!

Et remplacer

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$C$4" Then
Target.Value = ""
Load UserForm1
UserForm1.Show
End If
End Sub

par

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$C$4" Then
Target.Value = ""
Load UserForm1
UserForm1.Show
End If
If Target.Address = "$C$6" Then
Target.Value = ""
Load UserForm2
UserForm2.Show
End If
End Sub

Pour avoir l'appel de chacun des userform
Bonne chance

 

[rayhaaana]

Re : deux userform dans un meme onglet , comment faire svp!

Merci Tashiqi pr ta réponse, j'ai déjà essayer le code ci dessus , il ne marche pas et bloque la userform1 en plus !!
est ce que vous aurez d'autres idées?

 

[tashiqi]

Re : deux userform dans un meme onglet , comment faire svp!

Tu as effectué les deux changements ? (celui de Pierrot et le mien, après mon édition parce que je m'étais lamentablement gouré)

 

[rayhaaana]

Re : deux userform dans un meme onglet , comment faire svp!

Je ne sais pas comment appliquer la modif de Pierrot, j'ai pas très bien compris , expliquer moi svp je suis vraiment débutante !

 

[tashiqi]

Re : deux userform dans un meme onglet , comment faire svp!

En fait tu as 2 Userform
le premier s'appelle UserForm1, le deuxième Userform2
Quand tu appuies sur le bouton valider du premier, ça active le code :
UserForm1.Hide
Unload UserForm1
ce qui est normal
Mais pour le deuxième, il faut changer le nom, donc :
UserForm2.Hide
Unload UserForm2
Sinon, lorsque tu veux fermer ton deuxième Userform, VBA essaye de fermer le premier, qui n'est même pas ouvert !
Ai-je été assez clair ?

 

[Pierrot93]

Re : deux userform dans un meme onglet , comment faire svp!

Re,

A noter également, annuler peut être l'effet du double click :

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$C$4" Then
    Target.Value = ""
    Cancel = True
    Load UserForm1
    UserForm1.Show
End If
End Sub

 

[laetitia90]

Re : deux userform dans un meme onglet , comment faire svp!

bonjour tous pierrot

on pourrait faire avec seulement 1 user pas simplifier le code d'origine mais bon connais pas la finalite de tout cela ??

 

[rayhaaana]

Re : deux userform dans un meme onglet , comment faire svp!

Bonjour,
Merci tt le monde , juste une petite chose, où est ce que je dois intégrer cela exactement?
UserForm2.Hide
Unload UserForm2

 

[Pierrot93]

Re : deux userform dans un meme onglet , comment faire svp!

Bonjour,

Bonjour,
Merci tt le monde , juste une petite chose, où est ce que je dois intégrer cela exactement?
UserForm2.Hide
Unload UserForm2

dans une procédure, quand tu veux masquer / décharger l'userform en question....

bonne journée
@+