fonction recherche dans un macro

[kenny2410]

Bonjour à tous,

Voila.. comme beaucoup de monde sur ce forum, j'ai un soucis... (jusque la rien d'anormal...)

Je suis en train de faire une macro qui me permet de faire l'équivalent d'un recherche dans un tableau.

voila un exemple dans le fichier ci joint...

Le but étant de trouver les valeurs que je cherche par exemple 12 et me donner la valeur associée dans la colonne C)
Ça me permet de faire de tableaux et des graphes par la suite...
Dans un tableau "normal" un simple recherche ou recherchev suffirait mais dans une macro, je ne voies pas comment faire....

Merci de votre aide...

 

[RENAUDER]

Re : fonction recherche dans un macro

Bonjour,
Tu pourrais avoir quelque chose comme cela.

Sub Cherche()
    Range([A1], [A65536].End(xlUp)).Select
    i = 1
    For Each Cell In Selection
        If Cell.Value = "12" Then
            Cells(i, 8).Value = Cell.Value
            Cells(i, 9).Value = Cell.Offset(0, 3).Value
            i = i + 1
        Else
        End If
    Next Cell
End Sub

 

[kenny2410]

Re : fonction recherche dans un macro

Merci beaucoup pour ta réponse... elle me convient parfaitement...
Je vais la mettre en œuvre dans ma macro des que possible...

MERCI beaucoup...

 

[BOISGONTIER]

Re : fonction recherche dans un macro

Bonjour,

Avec FIND

 x = "13"
 Set c = [A:A].Find(what:=x, LookIn:=xlValues, lookat:=xlWhole)
 If Not c Is Nothing Then
   MsgBox c.Offset(0, 1).Value
   MsgBox c.Offset(0, 2).Value
 End If

JB
Formation Excel VBA JB

 

[ChTi160]

Re : fonction recherche dans un macro

Salut kenny2410
Bonjour le fil
Bonjour le Forum

Ma petite participation , en faisant un condensé des deux propositions.

Le Fichier : Regarde la pièce jointe test rechercheV1.xls

Bonne journée

 

[kenny2410]

Re : fonction recherche dans un macro

Bonjour à tous,

et Merci pour toutes vos réponses...

D'un autre cote, je voudrais pouvoir utiliser la fonction recherchev() avec comme deuxième paramètre (table matrice) un fichier xls qui comporte la date du jour dans le nom: (final-20080416.xls pour aujourd'hui)
Comment faire pour avoir dans ma fonction un paramètre qui puisse varier en fonction du jour?

Merci de votre aide...