OVH Cloud OVH Cloud

Erreur de type 91

5 réponses
Avatar
ManBas
Bonjour à tous,
J'ai de temps en temps (ça c'est le pire) un bogue à l'ouverture d'un
userform avec une erreur 91 (variable objet ou variable With). Evidemment je
n'ai pas retrouvé l'élément. Lorsque je parcours le code avec F8, le bogue
ne sort jamais.
Ayant triché en écrivant On error resume next, tout marche, sauf de temps en
temps, la vision (dans mon userform) d'un label appartenant à un autre
userform.
Le code dans uf_initialize est:
Label1.Caption =
ActiveWorkbook.VBProject.VBComponents("uf_2").Designer.Controls("Label2").Caption

Qu'en pensez-vous?
Merci de vos suggestions.

5 réponses

Avatar
michdenis
Bonjour ManBas,

Cet erreur 91 de ton code doit provenir du fait que ton formulaire "uf2" est chargé en mémoire vive qu'il soit visible ou non (hide)
de l'usager. En conséquence c'est pour cette raison que cette erreur arrive occasionnellement ... seulement si l'autre formulaire
est ouvert !

Salutations!



"ManBas" a écrit dans le message de news:
Bonjour à tous,
J'ai de temps en temps (ça c'est le pire) un bogue à l'ouverture d'un
userform avec une erreur 91 (variable objet ou variable With). Evidemment je
n'ai pas retrouvé l'élément. Lorsque je parcours le code avec F8, le bogue
ne sort jamais.
Ayant triché en écrivant On error resume next, tout marche, sauf de temps en
temps, la vision (dans mon userform) d'un label appartenant à un autre
userform.
Le code dans uf_initialize est:
Label1.Caption ActiveWorkbook.VBProject.VBComponents("uf_2").Designer.Controls("Label2").Caption

Qu'en pensez-vous?
Merci de vos suggestions.
Avatar
michdenis
Peut être qu'une solution, tu aimerais ?

Label1= uf_2.Label2.Caption


Salutations!



"ManBas" a écrit dans le message de news:
Bonjour à tous,
J'ai de temps en temps (ça c'est le pire) un bogue à l'ouverture d'un
userform avec une erreur 91 (variable objet ou variable With). Evidemment je
n'ai pas retrouvé l'élément. Lorsque je parcours le code avec F8, le bogue
ne sort jamais.
Ayant triché en écrivant On error resume next, tout marche, sauf de temps en
temps, la vision (dans mon userform) d'un label appartenant à un autre
userform.
Le code dans uf_initialize est:
Label1.Caption ActiveWorkbook.VBProject.VBComponents("uf_2").Designer.Controls("Label2").Caption

Qu'en pensez-vous?
Merci de vos suggestions.
Avatar
ManBas
Bonjour MichDenis,
Ce qui veut dire que je dois le mettre unload pour que ça fonctionne?
"michdenis" a écrit dans le message de news:

Bonjour ManBas,

Cet erreur 91 de ton code doit provenir du fait que ton formulaire "uf2"
est chargé en mémoire vive qu'il soit visible ou non (hide)
de l'usager. En conséquence c'est pour cette raison que cette erreur
arrive occasionnellement ... seulement si l'autre formulaire
est ouvert !

Salutations!



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

Bonjour à tous,
J'ai de temps en temps (ça c'est le pire) un bogue à l'ouverture d'un
userform avec une erreur 91 (variable objet ou variable With). Evidemment
je
n'ai pas retrouvé l'élément. Lorsque je parcours le code avec F8, le bogue
ne sort jamais.
Ayant triché en écrivant On error resume next, tout marche, sauf de temps
en
temps, la vision (dans mon userform) d'un label appartenant à un autre
userform.
Le code dans uf_initialize est:
Label1.Caption > ActiveWorkbook.VBProject.VBComponents("uf_2").Designer.Controls("Label2").Caption

Qu'en pensez-vous?
Merci de vos suggestions.





Avatar
ManBas
Merci MichDenis,
J'ai mis Unload UF2 sur uf1_initialize, ce qui semble résoudre les
problèmes...
A bientôt

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

Peut être qu'une solution, tu aimerais ?

Label1= uf_2.Label2.Caption


Salutations!



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

Bonjour à tous,
J'ai de temps en temps (ça c'est le pire) un bogue à l'ouverture d'un
userform avec une erreur 91 (variable objet ou variable With). Evidemment
je
n'ai pas retrouvé l'élément. Lorsque je parcours le code avec F8, le bogue
ne sort jamais.
Ayant triché en écrivant On error resume next, tout marche, sauf de temps
en
temps, la vision (dans mon userform) d'un label appartenant à un autre
userform.
Le code dans uf_initialize est:
Label1.Caption > ActiveWorkbook.VBProject.VBComponents("uf_2").Designer.Controls("Label2").Caption

Qu'en pensez-vous?
Merci de vos suggestions.





Avatar
michdenis
Bonjour ManBas,

Tu n'aimes pas ça des lignes de code courte

Label1= uf_2.Label2.Caption

Nul besoin de modifier le reste du code sauf si tu as d'autres raisons que celles évoquées dans ton message.


Salutations!


"ManBas" a écrit dans le message de news: %23$
Merci MichDenis,
J'ai mis Unload UF2 sur uf1_initialize, ce qui semble résoudre les
problèmes...
A bientôt

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

Peut être qu'une solution, tu aimerais ?

Label1= uf_2.Label2.Caption


Salutations!



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

Bonjour à tous,
J'ai de temps en temps (ça c'est le pire) un bogue à l'ouverture d'un
userform avec une erreur 91 (variable objet ou variable With). Evidemment
je
n'ai pas retrouvé l'élément. Lorsque je parcours le code avec F8, le bogue
ne sort jamais.
Ayant triché en écrivant On error resume next, tout marche, sauf de temps
en
temps, la vision (dans mon userform) d'un label appartenant à un autre
userform.
Le code dans uf_initialize est:
Label1.Caption > ActiveWorkbook.VBProject.VBComponents("uf_2").Designer.Controls("Label2").Caption

Qu'en pensez-vous?
Merci de vos suggestions.