Bonjour,
Je voudrais extraire un numéro de département d'un code postal situé entre la ligne 1 et 100 de la colonne A d'une feuille ("tmpsheet") contenant texte et nombre, puis le copier sur une autre feuille nommée "BDD".
Le code postal en question se trouve sur une ligne qui peut varier selon les documents (d'où le besoin de l'instruction de recherche) et dans la cellule il y a le code postal et la ville.
Voici le bout de code qui ne fonctionne pas:
J'imagine que je n'emploie pas la bonne instruction... Déjà parce que j'ai trouvé deux versions de "Find" avec des paramètres différents, à savoir .find(what, searchorder, etc.) qui renvoie (je crois) une valeur, et le .find(target, startline, startcolumn, endline, endcolumn, etc.), utilisé ci-dessous qui renvoie (je crois) du booléen: d'où sans doute le problème. Mais avec la première je n'arrive pas à combiner l'opérateur "Like..."
Si vous pouviez m'aider rapidement ça serait top!!
Merci d'avance
Je voudrais extraire un numéro de département d'un code postal situé entre la ligne 1 et 100 de la colonne A d'une feuille ("tmpsheet") contenant texte et nombre, puis le copier sur une autre feuille nommée "BDD".
Le code postal en question se trouve sur une ligne qui peut varier selon les documents (d'où le besoin de l'instruction de recherche) et dans la cellule il y a le code postal et la ville.
Voici le bout de code qui ne fonctionne pas:
Code:
Set strCPost = ThisWorkbook.Sheets("tmpsheet").Find("#####", 1, 1, 100, 1, True, False, True).Value
strCPost = Left(strCPost, 2)
strCPost.Copy Destination:=Sheets("BDD").Cells(lnbligne, 11)
J'imagine que je n'emploie pas la bonne instruction... Déjà parce que j'ai trouvé deux versions de "Find" avec des paramètres différents, à savoir .find(what, searchorder, etc.) qui renvoie (je crois) une valeur, et le .find(target, startline, startcolumn, endline, endcolumn, etc.), utilisé ci-dessous qui renvoie (je crois) du booléen: d'où sans doute le problème. Mais avec la première je n'arrive pas à combiner l'opérateur "Like..."
Si vous pouviez m'aider rapidement ça serait top!!
Merci d'avance
Dernière édition: