VBA Récupérer ds userform infos autre feuille
Résolu
Cartolinateur
Messages postés
1
Date d'inscription
Statut
Membre
Dernière intervention
-
Cartolinateur -
Cartolinateur -
Bonjour,
dans le cadre d'un projet, je souhaite récupérer dans un userform ouvert (Boutton Reprendre) à partir d'une première feuille, des données contenues dans une seconde feuille en effectuant une recherche à partir d'une référence.
Pour cela, j'ouvre l'userform, entre une référence et clique sur le boutton rechercher. La recherche s'effectue sur une autre feuille grace à une boucle qui retient le numéro de la ligne où la référence apparait. Le bug apparait quand je souhaite récupérer dans l'userform les informations contenues dans les autres colonnes de la ligne de cette autre feuille. A priori la variable "ligne" (enregistrer lors de la boucle de recherche) ne marche pas et je ne comprend pas pourquoi?
Ci-joint le fichier, le mieux étant de l'ouvrir et essayer de faire une recherche pour accéder directement au problème.
Lien du fichier: https://www.filedropper.com/
Merci d'avance.
Rémi
dans le cadre d'un projet, je souhaite récupérer dans un userform ouvert (Boutton Reprendre) à partir d'une première feuille, des données contenues dans une seconde feuille en effectuant une recherche à partir d'une référence.
Pour cela, j'ouvre l'userform, entre une référence et clique sur le boutton rechercher. La recherche s'effectue sur une autre feuille grace à une boucle qui retient le numéro de la ligne où la référence apparait. Le bug apparait quand je souhaite récupérer dans l'userform les informations contenues dans les autres colonnes de la ligne de cette autre feuille. A priori la variable "ligne" (enregistrer lors de la boucle de recherche) ne marche pas et je ne comprend pas pourquoi?
Ci-joint le fichier, le mieux étant de l'ouvrir et essayer de faire une recherche pour accéder directement au problème.
Lien du fichier: https://www.filedropper.com/
Merci d'avance.
Rémi
A voir également:
- VBA Récupérer ds userform infos autre feuille
- Recuperer message whatsapp supprimé - Guide
- Bruler feuille de laurier - Guide
- Récupérer mon compte facebook désactivé - Guide
- Feuille de pointage excel - Télécharger - Tableur
- Comment récupérer un compte facebook piraté - Guide
4 réponses
Salut le forum
Bienvenue Cartolinateur comme nouveau membres.
Pour joindre un fichier, tu envois ton fichier (sans données confidentielles)
sur https://www.cjoint.com/ , et tu recopies le lien obtenu à ton prochain message.
Mytå
Bienvenue Cartolinateur comme nouveau membres.
Pour joindre un fichier, tu envois ton fichier (sans données confidentielles)
sur https://www.cjoint.com/ , et tu recopies le lien obtenu à ton prochain message.
Mytå
Bonjour,
TexteBox nligne3:
ex si vous entrez 11 cela donne une chaine de caracteres "11" pas le nombre 11.
Il faut convertir cette chaine en nombre: CInt(nligne3),
donc:
If Sheets("Correctif en attente ex").Cells(i, 45) = CInt(nligne3) ...
Pour faire une recherche il y a avec l'aide excel : range.find,methode moyen de faire plus top.
A vous de voir
TexteBox nligne3:
ex si vous entrez 11 cela donne une chaine de caracteres "11" pas le nombre 11.
Il faut convertir cette chaine en nombre: CInt(nligne3),
donc:
If Sheets("Correctif en attente ex").Cells(i, 45) = CInt(nligne3) ...
Pour faire une recherche il y a avec l'aide excel : range.find,methode moyen de faire plus top.
A vous de voir
