Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Userform en mode non modal

Userform en mode non modal

3 réponses
Avatar
Michel MORICE
Bonsoir à tous.

Pouvez-vous m'expliquer pourquoi je me plante ?

Environnement XP et XL2003:

Dans un userform (AfficheForm) créé avec ShowModal=False, j'ai une zone de
label (AfficheLabel).
Avant de faire apparaitre AfficheForm je fais:
Load AfficheForm
AfficheForm.AfficheLabel.Caption = "Message"
Puis
AfficheForm.Show

Et là, rien n'est inscrit dans AfficheLabel ???.

Merci de votre aide

Michel
Beauvais Oise France
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Tatanka
Salut Michel,

Et si tu associais à un bouton la macro :

Sub Bouton1_QuandClic()
AfficheForm.Show
End Sub

avec ceci pour ton UserForm :

Private Sub UserForm_Initialize()
AfficheLabel.Caption = "Message"
End Sub

ça te conviendrait ?

Serge


"Michel MORICE" a écrit dans le message de news: 47558f01$0$27414$
Bonsoir à tous.

Pouvez-vous m'expliquer pourquoi je me plante ?

Environnement XP et XL2003:

Dans un userform (AfficheForm) créé avec ShowModalúlse, j'ai une zone de label (AfficheLabel).
Avant de faire apparaitre AfficheForm je fais:
Load AfficheForm
AfficheForm.AfficheLabel.Caption = "Message"
Puis
AfficheForm.Show

Et là, rien n'est inscrit dans AfficheLabel ???.

Merci de votre aide

Michel
Beauvais Oise France





Avatar
Michel MORICE
Serge,

Le fait de charger AfficheLabel dans une routine du userform solutionne mon
problème.
Je n'ai toujours pas compris pourquoi cela ne fonctionnait pas avec la
solution précédente.

Le principal est que mon problème soit résolu.

Merci pour ton aide
Michel

"Tatanka" a écrit dans le message de news:

Salut Michel,

Et si tu associais à un bouton la macro :

Sub Bouton1_QuandClic()
AfficheForm.Show
End Sub

avec ceci pour ton UserForm :

Private Sub UserForm_Initialize()
AfficheLabel.Caption = "Message"
End Sub

ça te conviendrait ?

Serge


"Michel MORICE" a écrit dans le message de news:
47558f01$0$27414$
Bonsoir à tous.

Pouvez-vous m'expliquer pourquoi je me plante ?

Environnement XP et XL2003:

Dans un userform (AfficheForm) créé avec ShowModalúlse, j'ai une zone
de label (AfficheLabel).
Avant de faire apparaitre AfficheForm je fais:
Load AfficheForm
AfficheForm.AfficheLabel.Caption = "Message"
Puis
AfficheForm.Show

Et là, rien n'est inscrit dans AfficheLabel ???.

Merci de votre aide

Michel
Beauvais Oise France









Avatar
Tatanka
Salut Michel,

J'ai associé cette macro à un bouton de commande
de la boîte à outils Formulaires avec ShowModal = False
pour le UserForm et ça fonctionne :

Sub Essai()
Load AfficheForm
AfficheForm.AfficheLabel.Caption = "Message"
AfficheForm.Show
End Sub

Serge


"Michel MORICE" a écrit dans le message de news: 475597f4$0$5070$
Serge,

Le fait de charger AfficheLabel dans une routine du userform solutionne mon problème.
Je n'ai toujours pas compris pourquoi cela ne fonctionnait pas avec la solution précédente.

Le principal est que mon problème soit résolu.

Merci pour ton aide
Michel

"Tatanka" a écrit dans le message de news:
Salut Michel,

Et si tu associais à un bouton la macro :

Sub Bouton1_QuandClic()
AfficheForm.Show
End Sub

avec ceci pour ton UserForm :

Private Sub UserForm_Initialize()
AfficheLabel.Caption = "Message"
End Sub

ça te conviendrait ?

Serge


"Michel MORICE" a écrit dans le message de news: 47558f01$0$27414$
Bonsoir à tous.

Pouvez-vous m'expliquer pourquoi je me plante ?

Environnement XP et XL2003:

Dans un userform (AfficheForm) créé avec ShowModalúlse, j'ai une zone de label (AfficheLabel).
Avant de faire apparaitre AfficheForm je fais:
Load AfficheForm
AfficheForm.AfficheLabel.Caption = "Message"
Puis
AfficheForm.Show

Et là, rien n'est inscrit dans AfficheLabel ???.

Merci de votre aide

Michel
Beauvais Oise France