XL 2013 Mon fichier bug

[Estysh]

Bonjour !
Je ne suis pas une pro du vba.
J'ai un fichier qui me permet de générer des factures, reçus, etc.
J'ai un userform qui est rempli pour générer les reçus. Lorsque je lance l'userform, j'ai une erreur lorsque je clique dans le combobox pour renseigner le nom du client (la rowsource est une zone nommée de mon fichier).
L'erreur est ERREUR D'AUTOMATION L'OBJET INVOQUÉ S'EST DÉCONNECTÉ DE SES CLIENTS.
Seul le bouton "Fin" est activé le bouton "Débogage " est désactivé.

Quand je clique sur fin, après tous mes combobox sont vides; les combobox de tous les userforms de mon fichier.

 

[JBARBE]

Bonjour !
Je ne suis pas une pro du vba.
J'ai un fichier qui me permet de générer des factures, reçus, etc.
J'ai un userform qui est rempli pour générer les reçus. Lorsque je lance l'userform, j'ai une erreur lorsque je clique dans le combobox pour renseigner le nom du client (la rowsource est une zone nommée de mon fichier).
L'erreur est ERREUR D'AUTOMATION L'OBJET INVOQUÉ S'EST DÉCONNECTÉ DE SES CLIENTS.
Seul le bouton "Fin" est activé le bouton "Débogage " est désactivé.

Quand je clique sur fin, après tous mes combobox sont vides; les combobox de tous les userforms de mon fichier.

Bonjour à tous, Estysh,
Hélas, pas de fichier, pas de macros ! Que pouvons nous faire !
Bonne journée

 

[Estysh]

Mon fichier est volumineux, je ne sais pas comment faire.

 

[JBARBE]

Mon fichier est volumineux, je ne sais pas comment faire.

Re,
ici :

Accueil de Cjoint.com

Le service des pièces jointes, CJoint.com est un service de partage de fichier gratuit pour partager vos documents dans vos courriels, sur les forums ou dans vos petites annonces.

www.cjoint.com

Si nécessaire le compressé !

 

[Staple1600]

Bonsoir le fil, Estych, JBARBE

j'ai une erreur lorsque je clique dans le combobox pour renseigner le nom du client (la rowsource est une zone nommée de mon fichier).

Essaie ne pas utiliser RowSource mais ce qui suit ci-dessous
(en l'adaptant à ton fichier)

Private Sub UserForm_Initialize()
ComboBox1.List = [maBase].Value
End Sub

NB: [maBase] correspond à ma plage nommée.

PS: On ne joint jamais le fichier ORIGINAL (même par le biais de cjoint)

 

[Estysh]

Re,
ici :

Accueil de Cjoint.com

Le service des pièces jointes, CJoint.com est un service de partage de fichier gratuit pour partager vos documents dans vos courriels, sur les forums ou dans vos petites annonces.

www.cjoint.com

Si nécessaire le compressé !

Merci. Mon fichier ci-joint.

fichier.xlsm

Le service des pièces jointes, CJoint.com est un service de partage de fichier gratuit pour partager vos documents dans vos courriels, sur les forums ou dans vos petites annonces.

www.cjoint.com

 

[Estysh]

Bonsoir le fil, Estych, JBARBE


Essaie ne pas utiliser RowSource mais ce qui suit ci-dessous
(en l'adaptant à ton fichier)

Private Sub UserForm_Initialize()
ComboBox1.List = [maBase].Value
End Sub

NB: [maBase] correspond à ma plage nommée.

PS: On ne joint jamais le fichier ORIGINAL (même par le biais de cjoint)

D'accord merci.

 

[Estysh]

Bonsoir le fil, Estych, JBARBE


Essaie ne pas utiliser RowSource mais ce qui suit ci-dessous
(en l'adaptant à ton fichier)

Private Sub UserForm_Initialize()
ComboBox1.List = [maBase].Value
End Sub

NB: [maBase] correspond à ma plage nommée.

PS: On ne joint jamais le fichier ORIGINAL (même par le biais de cjoint)

Lorsque je fais ça, j'ai en erreur objet requis.

 

[Staple1600]

Re

Tu as joint ton fichier original ou une copie?
(voir le message#5)
Comment s'appelle la zone nommée de ton fichier?

 

[Estysh]

Re

Tu as joint ton fichier original ou une copie?
(voir le message#5)
Comment s'appelle la zone nommée de ton fichier?

La zone nommée de mon fichier c'est Nom_Client
Quand je redémarre la machine, ça fonctionne la première fois.
L'erreur c'est la deuxième fois que je veux générer un reçu j'arrive à accéder à aucun combobox (ils sont tous vides)
J'ai joint l'original mais sans les données.

 

[JBARBE]

Re

Tu as joint ton fichier original ou une copie?
(voir le message#5)
Comment s'appelle la zone nommée de ton fichier?

Re, Bonjour Staple1600,
J'ai été dans l'impossibilité d'ouvrir le fichier !
Bonne journée !

 

[Staple1600]

Re

Et donc tu as testé ceci alors ?
(sous réserve que ton ComboBox se nomme bien ComboBox1)

Private Sub UserForm_Initialize()
ComboBox1.List = [Nom_Client].Value
End Sub

car j'avais précisé

Bonsoir le fil, Estych, JBARBE

Essaie ne pas utiliser RowSource mais ce qui suit ci-dessous
(en l'adaptant à ton fichier)

•>JBARBE
Je n'ai pas été voir.
Pour moi, un fichier exemple ne devrait jamais être volumineux

 

[JBARBE]

Re

Et donc tu as testé ceci alors ?
(sous réserve que ton ComboBox se nomme bien ComboBox1)

Private Sub UserForm_Initialize()
ComboBox1.List = [Nom_Client].Value
End Sub

car j'avais précisé


•>JBARBE
Je n'ai pas été voir.
Pour moi, un fichier exemple ne devrait jamais être volumineux

Re,
Le fichier s'est ouvert après un long moment !
Mais le VBA a un mot de passe !
Je propose qu'il nous fasse un copier-coller des macros posant problèmes !

 

[Estysh]

Re,
Le fichier s'est ouvert après un long moment !
Mais le VBA a un mot de passe !
Je propose qu'il nous fasse un copier-coller des macros posant problèmes !

Ça bug à la ligne
Frm.show
À l'initialisation du formulaire, il y'a
Txtdate.value = format(date, "dd.mm.yyy"

 

[Estysh]

Re,
Le fichier s'est ouvert après un long moment !
Mais le VBA a un mot de passe !
Je propose qu'il nous fasse un copier-coller des macros posant problèmes !

Le mot de passe c'est estelle