Recherche

bonjour

voila je dois une liste d'outillage que j'ai en stock au magasin

avec multi recherche

hyperlien ,liste deroulante

j'ai joint un fichier avec plus explications

merci pour votre aide

26liste2.7z (171.17 Ko)

Bonjour Ferdo, bonjour le forum,

Ton classeur a un comportement très étrange. Quand je l'ouvre la barre de tâche affiche plein de fenêtres et le fichier est ouvert 5 fois ?! Ça fout les jetons...

• Validation de données dans la cellule I9

Utilise cette formule : =DECALER($A$11;;;NBVAL($A:$A)-1) à la place de la tienne.

Elle permet d'avoir une liste dynamique (qui s'actualise automatiquement si tu ajoutes/effaces des données) et évite les blancs à la fin.

• Supprime carrément le Module1 avec la macro saugrenue [Couleur] !...

• Utilise les macros événementielles Change et SelectionChange ci-dessous :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$I$9" Then Exit Sub
If Target.Value = "" Then Exit Sub
Range("A10").CurrentRegion.Interior.ColorIndex = 2
Cells(Columns(1).Find(Target.Value, , xlValues, xlWhole).Row, 1).Resize(1, 6).Interior.ColorIndex = 17
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$I$9" Then Exit Sub
Range("I9").Value = Cells(ActiveCell.Row, 1).Value
End Sub

Tu devrais obtenir le résultat demandé.

bonjour Thautheme

excuse moi pour le retard pour te remercier

sa fonctionne impeccable

merci

résolu

Rechercher des sujets similaires à "recherche"