XL 2021 Utilisation de données pour un autre fichier

Gok73 · 24 Septembre 2024

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é

Oneida · 29 Septembre 2024

Bonjour,

Qu'est ce que vous appelez les codes du fichier inventaire?

job75 · 29 Septembre 2024

Bonjour Gok73, Oneida,

Effectivement la demande n'est pas claire, on ne sait pas ce qu'il faut faire.

En attendant il est écrit dans le fichier test-inventairev1.xlsm :

Le lien n'apparait pas avec RECHERCHEV

RECHERCHEV ne copie que les valeurs alors utilisez cette macro dans le code de la feuille :

VB:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row < 6 Or Target.Column <> 2 Then Exit Sub
Dim c As Range
Set c = Columns(7).Find(Target(1), , xlValues, xlWhole)
Target(1, 2).Resize(, 3).ClearContents 'RAZ
If c Is Nothing  Or Target(1) = "" Then Exit Sub
Target(1, 2).Resize(, 3) = c(1, 2).Resize(, 3).Value
If c(1, 4).Hyperlinks.Count Then Hyperlinks.Add Target(1, 4), "", c(1, 4).Hyperlinks(1).SubAddress
End Sub

Elle se déclenche quand on modifie ou valide une cellule en colonne B.

A+

XL 2021 Utilisation de données pour un autre fichier

Gok73

XLDnaute Nouveau

Pièces jointes

Oneida

XLDnaute Impliqué

job75

XLDnaute Barbatruc

Pièces jointes

Discussions similaires