Utilisation de données pour un autre fichier
Bonjour à tous !
Pour des raisons de volume, j'ai rétréci mon fichier qui fait 8Mo...Les Racks allant de A à R
Je souhaiterais intégrer un moteur de recherche. Je l'avais demandé précédemment dans un autre message, que j'ai clôturé parce que j'avais très mal structuré le tableau ! J'ai refait le tableau de façon à ce sut cela soit simple. Le fichier en question est "Plan chambre Froide-test.xlsm" Le fichier complet fait 8Mo allant de A à R pour 576000 emplacements en tout !
J'ai, dans le même temps, un autre fichier qui contient un moteur de recherche 100% opérationnel (le fichier "Test-inventaire1.xlsm") Ma question est la suivante : peut-on utiliser les codes du fichier inventaire pour le gros fichier "Plan chambre froide-test"
Le truc de cool qu'il y a sur le "test inventaire" est qu'il s'adapte dès que j'ajoute une ligne. Ce serait bien de pouvoir utiliser les mêmes lignes sur la "chambre froide"
Merci d'avance la communauté
Bonjour
Vous auriez dû rester sur le même fil je pense
Avez-vous vu la proposition de AEFH ici --> https://forum.excel-pratique.com/s/goto/1218615
Crdlt
Bonjour Dan,
J'ai trouvé ceci :
Sub MoteurDeRecherche()
motclé = InputBox("Numéro de plan à chercher :", "Moteur de recherche", "Exemple: 315068")
For Each ws In Worksheets
With ws.Columns("b:b")
Set re = .Find(motclé, lookat:=xlWhole)
If Not re Is Nothing Then
fa = re.Address
Do
ws.Activate
re.Select
Exit Sub
Set re = .FindNext(re)
Loop Until re Is Nothing Or re.Address = fa
End If
End With
Next
End SubEt c'est redoutablement efficace ! Enfin...
Edit modo : merci de mettre vos codes en utilisant les balises de code disponible dans le menu en cliquant sur </>.
J'ai corrigé dans votre post pour que vous voyiez
Bonsoir
@ Dan: Effectivement j'attendais une réponse sur le fil précédent, car j'avais retravaillé le sujet, mais mon fichier fait + de 4 Mo.
Voici un résultat avec le fichier de ce fil
Cdt
Papy Henri
Bonjour
Réponse brève, mais elle existe.
Papy Henri