Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 27/10/2011, 17h48   #1
Invité de passage
 
Inscription : juillet 2007
Messages : 22
Détails du profil
Informations forums :
Inscription : juillet 2007
Messages : 22
Points : 4
Points : 4
Par défaut Appel procédure userform

Bonjour,

J'ai créer un userform, et développer du code lié à celui-ci dans la partie userform.
Je veux lancer l'affichage du userform à partir du module mais je n'y arrive pas. Mon code est le suivant:

Code :
1
2
3
4
5
6
Option Explicit
Public userform1 As userform
 
Public Sub Workbook_Open()
userform1.Show
End Sub
Il m'indique que la variable objet n'est pas définie. ????
rocuet est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/10/2011, 17h54   #2
Membre Expert
 
Femme
Ingénieur développement logiciels
Inscription : juin 2007
Messages : 480
Détails du profil
Informations personnelles :
Sexe : Femme
Localisation : France, Ain (Rhône Alpes)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : juin 2007
Messages : 480
Points : 1 024
Points : 1 024
Bonjour,
C'est la déclaration qui provoque le problème :
Code :
Public userform1 As userform
Il faut enlever cette ligne, il n'est pas nécessaire de déclarer une variable pour ça, l'objet Userform1 existe déjà du moment que le projet contient ce Userform.
tedo01 est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 27/10/2011, 18h00   #3
Invité de passage
 
Inscription : juillet 2007
Messages : 22
Détails du profil
Informations forums :
Inscription : juillet 2007
Messages : 22
Points : 4
Points : 4
Ca ne fonctionne pas mieux. Merci quand même.
rocuet est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/10/2011, 18h10   #4
Membre Expert
 
Femme
Ingénieur développement logiciels
Inscription : juin 2007
Messages : 480
Détails du profil
Informations personnelles :
Sexe : Femme
Localisation : France, Ain (Rhône Alpes)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : juin 2007
Messages : 480
Points : 1 024
Points : 1 024
Re-bonjour,
Quel est le nom du userform ? Est-ce qu'il est dans le même classeur que le module ?
tedo01 est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 27/10/2011, 18h19   #5
Membre Expert
 
Homme
Retraité
Inscription : avril 2011
Messages : 692
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France

Informations professionnelles :
Activité : Retraité

Informations forums :
Inscription : avril 2011
Messages : 692
Points : 1 443
Points : 1 443
Bonjour,

Est-ce que tu as bien placé le code dans le module « ThisWorkbook » ?

Code :
1
2
3
Private Sub Workbook_Open()
    UserForm1.Show
End Sub
Cordialement.
gFZT82 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/10/2011, 18h19   #6
Invité de passage
 
Inscription : juillet 2007
Messages : 22
Détails du profil
Informations forums :
Inscription : juillet 2007
Messages : 22
Points : 4
Points : 4
Introduction. Il ne se trouve pas dans le module de code.
rocuet est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 27/10/2011, 19h04   #7
Membre Expert
 
Femme
Ingénieur développement logiciels
Inscription : juin 2007
Messages : 480
Détails du profil
Informations personnelles :
Sexe : Femme
Localisation : France, Ain (Rhône Alpes)

Informations professionnelles :
Activité : Ingénieur développement logiciels

Informations forums :
Inscription : juin 2007
Messages : 480
Points : 1 024
Points : 1 024
Re-bonjour,
Alors il faut écrire
tedo01 est déconnecté   Envoyer un message privé Réponse avec citation 10
Réponse Proposer ce sujet en actualité
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 05h51.


 
 
 
 
Partenaires

Hébergement Web