Affichage message et UserForm

Le
dyj Orange
Bonjour,
Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un seul
bouton, les autres sont masqués. Je voudrai afficher un message (MsgBox)
pour donner des informations à l'utilisateur.
Mais voilà, mon message s'affiche derrière la Userform. Certainement du
paramétrage à faire.
Merci pour votre aide.
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses Page 1 / 2
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
DanielCo
Le #22482411
Bonjour.
Mets la propriété de l'userform "ShowModal" to "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également
travailler sur le classeur sans feermer le userform.
Cordialement.
Daniel


Bonjour,
Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un seul
bouton, les autres sont masqués. Je voudrai afficher un message (MsgBox) pour
donner des informations à l'utilisateur.
Mais voilà, mon message s'affiche derrière la Userform. Certainement du
paramétrage à faire.
Merci pour votre aide.
DanielCo
Le #22482401
Rectif :
Bonjour.
Mets la propriété de l'userform "ShowModal" à "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également
travailler sur le classeur sans feermer le userform.
Cordialement.
Daniel



Bonjour.
Mets la propriété de l'userform "ShowModal" to "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également travailler
sur le classeur sans feermer le userform.
Cordialement.
Daniel
dyj Orange
Le #22482591
Je masque EXCEL car je ne veux pas que l'utilisateur utilise la feuille dans
lequel je vais stocker des info. Sur l'écran, je n'ai que le UserForm, et le
message est derrière. Je le voudrai devant la UserForm.

"DanielCo" discussion : i4g9l3$qv4$
Rectif :
Bonjour.
Mets la propriété de l'userform "ShowModal" à "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également
travailler sur le classeur sans feermer le userform.
Cordialement.
Daniel



Bonjour.
Mets la propriété de l'userform "ShowModal" to "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également
travailler sur le classeur sans feermer le userform.
Cordialement.
Daniel




LSteph
Le #22482581
Bonjour,

Ne l'appelerais tu pas apres dans le même code..? .. , genre:

userform1.show
msgbox "je ne suis forcément visible qu'une fois le UF refermé"

Car sinon Modal ou Pas théoriquement non il s'affiche bien devant.
Sous réserve qu'il soit bien appelé par le code du userform
dès lors que celui ci est affiché exemple:

Private Sub UserForm_Initialize()
Dim i As Integer
With Me.Controls
For i = 2 To .Count
.Item("Commandbutton" & i).Visible = False
Next
End With
MsgBox "clic sur le bouton"
End Sub

Private Sub CommandButton1_Click()
CommandButton2.Visible = True
MsgBox "continue"
End Sub

Private Sub CommandButton2_Click()
CommandButton3.Visible = True
MsgBox "encore"
End Sub

Private Sub CommandButton3_Click()
MsgBox "fini"
Unload Me
End Sub

'LSteph

On 18 août, 08:58, "dyj Orange"
Bonjour,
Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un seul
bouton, les autres sont masqués. Je voudrai afficher un message (MsgBox )
pour donner des informations à l'utilisateur.
Mais voilà, mon message s'affiche derrière la Userform. Certainement du
paramétrage à faire.
Merci pour votre aide.
LSteph
Le #22482571
...j'oubliais tout de même en complément

Si en suite tu fais ceci:

UserForm1.Show 0
MsgBox "je suis visible une fois le UF affiché"

Mais si l'utilisateur dois d'abord passer par l'utilisation du
userform
je n'emploierai pas cela.

Cordialement.

--
LSteph



On 18 août, 12:22, LSteph
Bonjour,

Ne l'appelerais tu pas apres dans le même code..? .. , genre:

userform1.show
msgbox "je ne suis forcément visible qu'une fois le UF refermé"

Car sinon Modal ou Pas théoriquement non il s'affiche bien devant.
Sous réserve qu'il soit bien appelé par le code du userform
dès lors que celui ci est affiché exemple:

Private Sub UserForm_Initialize()
Dim i As Integer
With Me.Controls
For i = 2 To .Count
.Item("Commandbutton" & i).Visible = False
Next
End With
MsgBox "clic sur le bouton"
End Sub

Private Sub CommandButton1_Click()
CommandButton2.Visible = True
MsgBox "continue"
End Sub

Private Sub CommandButton2_Click()
CommandButton3.Visible = True
MsgBox "encore"
End Sub

Private Sub CommandButton3_Click()
MsgBox "fini"
Unload Me
End Sub

'LSteph

On 18 août, 08:58, "dyj Orange"


> Bonjour,
> Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un seul
> bouton, les autres sont masqués. Je voudrai afficher un message (MsgB ox)
> pour donner des informations à l'utilisateur.
> Mais voilà, mon message s'affiche derrière la Userform. Certainemen t du
> paramétrage à faire.
> Merci pour votre aide.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -
dyj Orange
Le #22482561
Merci beaucoup une fois de plus. Ca marche.

"LSteph" discussion :

...j'oubliais tout de même en complément

Si en suite tu fais ceci:

UserForm1.Show 0
MsgBox "je suis visible une fois le UF affiché"

Mais si l'utilisateur dois d'abord passer par l'utilisation du
userform
je n'emploierai pas cela.

Cordialement.

--
LSteph



On 18 août, 12:22, LSteph
Bonjour,

Ne l'appelerais tu pas apres dans le même code..? .. , genre:

userform1.show
msgbox "je ne suis forcément visible qu'une fois le UF refermé"

Car sinon Modal ou Pas théoriquement non il s'affiche bien devant.
Sous réserve qu'il soit bien appelé par le code du userform
dès lors que celui ci est affiché exemple:

Private Sub UserForm_Initialize()
Dim i As Integer
With Me.Controls
For i = 2 To .Count
.Item("Commandbutton" & i).Visible = False
Next
End With
MsgBox "clic sur le bouton"
End Sub

Private Sub CommandButton1_Click()
CommandButton2.Visible = True
MsgBox "continue"
End Sub

Private Sub CommandButton2_Click()
CommandButton3.Visible = True
MsgBox "encore"
End Sub

Private Sub CommandButton3_Click()
MsgBox "fini"
Unload Me
End Sub

'LSteph

On 18 août, 08:58, "dyj Orange"


> Bonjour,
> Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un
> seul
> bouton, les autres sont masqués. Je voudrai afficher un message
> (MsgBox)
> pour donner des informations à l'utilisateur.
> Mais voilà, mon message s'affiche derrière la Userform. Certainement du
> paramétrage à faire.
> Merci pour votre aide.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -



DanielCo
Le #22482841
Pourquoi alors ne pas simplement masquer la feuille, au besoin avec
l'option "xlveryhiddden" ?
Daniel


Je masque EXCEL car je ne veux pas que l'utilisateur utilise la feuille dans
lequel je vais stocker des info. Sur l'écran, je n'ai que le UserForm, et le
message est derrière. Je le voudrai devant la UserForm.

"DanielCo" discussion : i4g9l3$qv4$
Rectif :
Bonjour.
Mets la propriété de l'userform "ShowModal" à "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également
travailler sur le classeur sans feermer le userform.
Cordialement.
Daniel



Bonjour.
Mets la propriété de l'userform "ShowModal" to "false" ou afficher ton
userform comme suit :
UserForm1.Show False
Ce qui est équivalent. Note qu'ainsi, l'utilisateur peut également
travailler sur le classeur sans feermer le userform.
Cordialement.
Daniel




Jacquouille
Le #22487111
Bonsoir Steph
A tout hasard, aurais-tu reçu mon mail en BAL Perso, svp ?
merci
Jacques.

--
Bien amicalmement,
"Le vin est au repas ce que le parfum est à la femme."

Jacquouille (MPFE).

"LSteph"
...j'oubliais tout de même en complément

Si en suite tu fais ceci:

UserForm1.Show 0
MsgBox "je suis visible une fois le UF affiché"

Mais si l'utilisateur dois d'abord passer par l'utilisation du
userform
je n'emploierai pas cela.

Cordialement.

--
LSteph



On 18 août, 12:22, LSteph
Bonjour,

Ne l'appelerais tu pas apres dans le même code..? .. , genre:

userform1.show
msgbox "je ne suis forcément visible qu'une fois le UF refermé"

Car sinon Modal ou Pas théoriquement non il s'affiche bien devant.
Sous réserve qu'il soit bien appelé par le code du userform
dès lors que celui ci est affiché exemple:

Private Sub UserForm_Initialize()
Dim i As Integer
With Me.Controls
For i = 2 To .Count
.Item("Commandbutton" & i).Visible = False
Next
End With
MsgBox "clic sur le bouton"
End Sub

Private Sub CommandButton1_Click()
CommandButton2.Visible = True
MsgBox "continue"
End Sub

Private Sub CommandButton2_Click()
CommandButton3.Visible = True
MsgBox "encore"
End Sub

Private Sub CommandButton3_Click()
MsgBox "fini"
Unload Me
End Sub

'LSteph

On 18 août, 08:58, "dyj Orange"


> Bonjour,
> Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un
> seul
> bouton, les autres sont masqués. Je voudrai afficher un message (MsgBox)
> pour donner des informations à l'utilisateur.
> Mais voilà, mon message s'affiche derrière la Userform. Certainement du
> paramétrage à faire.
> Merci pour votre aide.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -
dyj Orange
Le #22488151
Non, mon adresse est invalide. Je me la suis fais piratée une fois, une de
trop.

"Jacquouille" groupe de discussion : 4c6d64b3$0$5310$
Bonsoir Steph
A tout hasard, aurais-tu reçu mon mail en BAL Perso, svp ?
merci
Jacques.

--
Bien amicalmement,
"Le vin est au repas ce que le parfum est à la femme."

Jacquouille (MPFE).

"LSteph"
...j'oubliais tout de même en complément

Si en suite tu fais ceci:

UserForm1.Show 0
MsgBox "je suis visible une fois le UF affiché"

Mais si l'utilisateur dois d'abord passer par l'utilisation du
userform
je n'emploierai pas cela.

Cordialement.

--
LSteph



On 18 août, 12:22, LSteph
Bonjour,

Ne l'appelerais tu pas apres dans le même code..? .. , genre:

userform1.show
msgbox "je ne suis forcément visible qu'une fois le UF refermé"

Car sinon Modal ou Pas théoriquement non il s'affiche bien devant.
Sous réserve qu'il soit bien appelé par le code du userform
dès lors que celui ci est affiché exemple:

Private Sub UserForm_Initialize()
Dim i As Integer
With Me.Controls
For i = 2 To .Count
.Item("Commandbutton" & i).Visible = False
Next
End With
MsgBox "clic sur le bouton"
End Sub

Private Sub CommandButton1_Click()
CommandButton2.Visible = True
MsgBox "continue"
End Sub

Private Sub CommandButton2_Click()
CommandButton3.Visible = True
MsgBox "encore"
End Sub

Private Sub CommandButton3_Click()
MsgBox "fini"
Unload Me
End Sub

'LSteph

On 18 août, 08:58, "dyj Orange"


> Bonjour,
> Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un
> seul
> bouton, les autres sont masqués. Je voudrai afficher un message
> (MsgBox)
> pour donner des informations à l'utilisateur.
> Mais voilà, mon message s'affiche derrière la Userform. Certainement du
> paramétrage à faire.
> Merci pour votre aide.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -




dyj Orange
Le #22488521
Il me reste à régler un petit problème à la fermeture de mon Userform1. En
cliquant sur la croix rouge, je pense que ça déclenche l'événement
"Terminate", donc j'ai fait ce bout de code:

Private Sub UserForm_Terminate()
ActiveWorkbook.Save
Unload UserForm1
Unload UserForm2
Excel.Application.Quit
End Sub

et pourtant dans le gestionnaire de tâches, il me reste toujours une
instante du processus EXCEL. Que me manque t-il dans mon code ?
Merci

"LSteph" discussion :

...j'oubliais tout de même en complément

Si en suite tu fais ceci:

UserForm1.Show 0
MsgBox "je suis visible une fois le UF affiché"

Mais si l'utilisateur dois d'abord passer par l'utilisation du
userform
je n'emploierai pas cela.

Cordialement.

--
LSteph



On 18 août, 12:22, LSteph
Bonjour,

Ne l'appelerais tu pas apres dans le même code..? .. , genre:

userform1.show
msgbox "je ne suis forcément visible qu'une fois le UF refermé"

Car sinon Modal ou Pas théoriquement non il s'affiche bien devant.
Sous réserve qu'il soit bien appelé par le code du userform
dès lors que celui ci est affiché exemple:

Private Sub UserForm_Initialize()
Dim i As Integer
With Me.Controls
For i = 2 To .Count
.Item("Commandbutton" & i).Visible = False
Next
End With
MsgBox "clic sur le bouton"
End Sub

Private Sub CommandButton1_Click()
CommandButton2.Visible = True
MsgBox "continue"
End Sub

Private Sub CommandButton2_Click()
CommandButton3.Visible = True
MsgBox "encore"
End Sub

Private Sub CommandButton3_Click()
MsgBox "fini"
Unload Me
End Sub

'LSteph

On 18 août, 08:58, "dyj Orange"


> Bonjour,
> Mon application Excel+VBA démarre par l'affichage d'un UserFrom avec un
> seul
> bouton, les autres sont masqués. Je voudrai afficher un message
> (MsgBox)
> pour donner des informations à l'utilisateur.
> Mais voilà, mon message s'affiche derrière la Userform. Certainement du
> paramétrage à faire.
> Merci pour votre aide.- Masquer le texte des messages précédents -

- Afficher le texte des messages précédents -



Publicité
Poster une réponse
Anonyme