Discussion :

[Garruth]

Bonjour

Je souhaiterais lier deux Userforms comme ceci:
En remplissant une TextBox dans un userform, mon programme doit modifier le caption d'un label situé dans un autre Userform.
J'ai essayé le Code suivant dans MONTEXTBOX_Change():

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ThisWorkBook.VBProject.VBComponents("NomUserform").Designer.Controls("NomdelaLabelBox").Caption = NOMTEXTBOX.Value

VBA me renvoie alors:

Erreur exécution 91
Variable objet ou Variabe de Bloc With non défini

à Noter: l'userform "NomUserform" est actif (je peux le désactiver mais j'aimerais mieux pas)

Je n'arrive pas trouver l'erreur et j'aurais besoin d'aide

Merci d'avance

[Daniel.C]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Nomuserform.NomdelaLabelBox.Caption = NOMTEXTBOX.Value

[Garruth]

Merci, j'ai l'impression que c'était trop facile!!! ^^

J'avais utilisé ce format pour la raison suivante:
Ma TextBox peut remplir quatre Label: Label1, Label2, Label3 et Label4 le numéro étant defini par une variable que je mets au format Texte et que je concatène:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

"Label"&CStr(Variable)

Il y a t il un moyen de transformer cette String en Objet reconnu par VBA?

Merci d'avance

[Daniel.C]

Essaie :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Nomuserform.Controls("Label" & Variable)

Tu ne dois pas avoir besoin de "CStr", le fait de mettre "Variable" après "Label" fais que le nom est du string.

[Garruth]

Parfait c'est ce qu'il me fallait, j'ai cherché trop compliqué ^^

Le CStr c'est parce que ma variable est récupérée dans une case Excel (J'avoue j'ai pas précisé).

Merci Beaucoup du Coup de pieds!!

Cordialement

=> RESOLU