VBA Rechercher emplacement articles

Bonjour,

J'ai dans l'onglet "Accueil" et en colonne B des références (articles)

En colonne C je voudrais récupérer les emplacements (recherche dans l'onglet "Données" colonne U)

En vrai dans l'onglet Données j'ai presque 7000 lignes

Les problèmes :

1) Lorsque j'importe des références dans ma colonne B, les cellules m'indiques parfois des erreurs

2) Mon programme est hyper long à faire les recherches (je vous déconseille de l'essayer)

Je dois avouer que le programme je l'ai trouvé sur le net.

Il n'y aurait pas moyen de refaire le programme autrement ? (je voudrais éviter la RechercheV)

Merci pour votre aide

10exemple.zip (202.70 Ko)

Bonjour Jefekoi

Non mais vous êtes sérieux pourquoi vous nous dites

je voudrais éviter la RechercheV

C'est le plus simple et le plus efficace dans votre cas

Je n'aime pas cette fonction elle créé souvent des problèmes

capture d ecran 2022 06 26 075649

Re

Jefekoi tu m'as fait ma journée, merci

=SIERREUR(RECHERCHEV(B7;Données!B2:U3671;2;FAUX);"-")

C'est simple non

Merci

Mais j'ai quand même une erreur dans la cellule

Formule incohérente

Une autre erreur il me met un tiret dans la cellule alors qu'il devrait me mettre un résultat existant ...

un truc que je viens de voir, ce que j'importe dans l'onglet Données (qui vient d'un logiciel machine) , les cellules sont bizarres

lorsque je fait une recherche (exemple je cherche 123313243), il m'indique un tiret, et lorsque je vais vérifier dans l'onglet "Données" et il devrait me donner un résultat (Rayon92C52)

le problème est réglé uniquement si je réécrit dans la cellule 123313243

Il va de soit que je fais les essais dans la vrai macro, je ne peux la mettre ici trop confidentiel

Bonjour

Bonjour à tous

Une variante macro

8exemple-v1.zip (210.32 Ko)

Bye !

Merci GMB, je suis en train de l'adapter à mon programme

bonjour,

@GMB, je ne suis pas du tout fan de "option explicit", mais si on declare des variables TabloX comme ça, il faut le faire dans la macro elle-même ou il faut les liberer à la fin de la macro avec "Erase tabloA, tabloR, tabloD", autrement ils restent en memoire, la même chose avec iA et iD, ils ne sont pas automatiquement mise à zéro.

GBM

Ça marche bien sauf qu'il y a des moments où il m'affiche le numéro de la colonne B en résultat

ici

C'est bon j'ai compris le 3780700590 n'existe pas dans l'onglet Données

@BsAlv

Merci ! Ce soir je m'endormirai heureux d'avoir appris quelque chose...

Bye !

Merci encore

Il y a moyen de mettre une condition ou autre ?

Comme j'ai dit plus haut il y a des moment il me donne en résultat le même numéro que ma recherche, exemple je cherche 9980700444 il me donne en résultat 9980700444 parce qu'il est pas dans les données.

Bonjour

je cherche 9980700444 il me donne en résultat 9980700444 parce qu'il est pas dans les données.

Désolé mais je n'ai pas le même résultat :

sans titre 2

Or, je ne peux essayer de supprimer un bug que si j'arrive à le reproduire...

Bye !

Ok merci j'ai compris pourquoi, j'ai mis 1 sur la ligne :

Range("E3").Resize(UBound(tabloA, 1), 1) = tabloA

au lieu de :

Range("E3").Resize(UBound(tabloA, 1), 2) = tabloA

Comment puis-je faire pour qu'il m'affiche uniquement l'emplacement ?

bonjour
écrire dans la colonne F, la 2ième colonne de tablo avec
Range("F3").Resize(UBound(tabloA, 1), 1) = application.index(tabloA,0,2)

Nickel merci BsAlv

Je reviens vers vous car l'exemple que nous donne GMB me plais beaucoup pour des futurs macros que j'envisage de faire.

Si je veux ajouter une troisième colonne comment faire ?

Merci pour votre aide

Bonjour,

j’essaie de comprendre mais plus j'avance plus c'est mauvais.

Je n'arrive pas à afficher la colonne B et C

Là dans mon exemple la ligne 66 ne s'affiche pas :(

Merci de m'aider à 60 ans cela devient difficile à faire rentrer dans le crane ...

11exemple-v2.xlsm (26.94 Ko)
Rechercher des sujets similaires à "vba rechercher emplacement articles"