excel vba condition sur deux colonnes

Bonjour,
J'ai un petit problème à résoudre avec un code vba :
Je voudrais pouvoir récupérer le numéro de la ligne qui vérifie cette condition : lorsque dans une colonne A une valeur Va est atteinte, et que dans une autre colonne B la valeur Vb est atteinte. J'ai trouvé une solution sous excel à l'aide des fonctions :index(), equiv() et si() mais je n'arrive pas à la transcrire en vba.

Serait-il possible d'avoir un petit coup de pouce?

Merci
Thibaut

Salut,

as-tu essayé de faire Macro - >Enregistrement nouvelle macro et puis de faire F2 sur la/les cellules ou ta/tes fonctions(s) se trouve(nt).

Dans le module généré, tu verras certainement du code qui t'aideras.

J'espère que ce n'est pas trop simpliste.

A+

Bonjour,

Quelque chose de ce style ?

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub test() Dim i As Integer, r As Integer   For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row If Cells(i, 1) = "Va" Then If Cells(i, 2) = "Vb" Then r = Rows(i) Exit For End If End If Next   MsgBox "la ligne contenant Va et Vb est : " & r   End Sub

---

Merci pour ta réponse, mais j'ai déja essayé d'utiliser le code correspondant mais lorsque je veux utiliser la fonction avec un Application.WorksheetFunction.index par exemple, cela ne fonctionne pas.

j'ai testé le code, et j'ai un message du genre : incompatibilité de type...c'est exactement ça que je veux faire.

Je crois que j'ai fait une petite boulette au niveau de la ligne trouvée, essaye comme ceci

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub test() Dim i As Integer, r As Integer   For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row If Cells(i, 1) = "Va" Then If Cells(i, 2) = "Vb" Then r = i '<-- modif Exit For End If End If Next   MsgBox "la ligne contenant Va et Vb est : " & r   End Sub

---

En enlevant le rows() et en utilisant directement la valeur de i, ça fonctionne bien.

Merci!