jedemenage
XLDnaute Nouveau
Bonjour,
Je souhaite, depuis un userform, "captionner" un label d'après une recherche établie sur des données d'une feuille.
J'ai écris l'équivalent de cela (pour exemple) :
Private sub Userform_Activate()
Msgbox Application.Recherchv(NomUserForm.NomTextBox.Value, Sheets("NomFeuille").Rang("A1:E100"), 2, False)
En lançant le code, j'obtiens un message d'erreur comme suit :
"Erreur d'exécution '438': Propriété ou méthode non gérée par cet objet
Ensuite, en mode débogage, la ligne de code en jaune produit les effets suivants.
Si je me positionne sur la chaîne :
"NomUserForm.NomTextBox.Value", j'affiche bien la valeur de la TextBox,
"False", j'affiche False=Faux
"Sheets..." etc., rien du tout.
En annexe, j'ai fait un petit exemple de ce qui ne marche pas.
Etant au travail, je ne pourrai pas downloader en retour le fichier : serait-il envisageable de bénéficier de vos conseils avec le texte du code dans le message de réponse, svp ?
Question subsidiaire : est-it possible de faire ce type de recherche dans une table (zone nommée, comme dans l'exemple "Table_ABCD", plutôt que de déclarer la zone elle-même (A1:E100) ?
P.S. : J'ai découvert hier les "WIKI" de MichelXld (mieux vaut tard que jamais...) : déjà que je trouvais la tenue du forum, son contenu et les interventions des forumeurs remarquables, je dis : MERCI, MERCI, et MERCI. Et également BRAVO !)
Je souhaite, depuis un userform, "captionner" un label d'après une recherche établie sur des données d'une feuille.
J'ai écris l'équivalent de cela (pour exemple) :
Private sub Userform_Activate()
Msgbox Application.Recherchv(NomUserForm.NomTextBox.Value, Sheets("NomFeuille").Rang("A1:E100"), 2, False)
En lançant le code, j'obtiens un message d'erreur comme suit :
"Erreur d'exécution '438': Propriété ou méthode non gérée par cet objet
Ensuite, en mode débogage, la ligne de code en jaune produit les effets suivants.
Si je me positionne sur la chaîne :
"NomUserForm.NomTextBox.Value", j'affiche bien la valeur de la TextBox,
"False", j'affiche False=Faux
"Sheets..." etc., rien du tout.
En annexe, j'ai fait un petit exemple de ce qui ne marche pas.
Etant au travail, je ne pourrai pas downloader en retour le fichier : serait-il envisageable de bénéficier de vos conseils avec le texte du code dans le message de réponse, svp ?
Question subsidiaire : est-it possible de faire ce type de recherche dans une table (zone nommée, comme dans l'exemple "Table_ABCD", plutôt que de déclarer la zone elle-même (A1:E100) ?
P.S. : J'ai découvert hier les "WIKI" de MichelXld (mieux vaut tard que jamais...) : déjà que je trouvais la tenue du forum, son contenu et les interventions des forumeurs remarquables, je dis : MERCI, MERCI, et MERCI. Et également BRAVO !)
Dernière édition:
