Extraire numéro ligne en fonction valeur cellule

kheldar

XLDnaute Nouveau
Bonjour au forum.

Je souhaiterai avoir la syntaxe VBA pour extraire le numéro de ligne (row) d'une cellule comportant une certaine valeur.

Par exemple, si j'ai 1300 lignes remplies avec pour chacune de ces lignes une valeur dans la colonne A, et que dans cette colonne je recherche la valeur "BIG BANG" qui est dans la cellule A250 cette fois-ci, je souhaiterai pouvoir extraire la valeur "250" car "BIG BANG" présent en ligne 250; chaque valeur de cellule est unique, aucun risque de doublon.

En espérant avoir été clair sur ma demande, merci d'avance.
Cordialement.
 

Pierrot93

XLDnaute Barbatruc
Re : Extraire numéro ligne en fonction valeur cellule

Bonjour Kheldar,

essaye peut être le code ci-dessous :

Code:
Option Explicit
Sub test()
Dim x As Range, s As String
s = "BIG BANG"
Set x = Range("A:A").Find(s, , xlValues, xlWhole, , , False)
If Not x Is Nothing Then MsgBox s & " trouvé sur la ligne : " & x.Row
End Sub

bonne journée
@+
 

kheldar

XLDnaute Nouveau
Re : Extraire numéro ligne en fonction valeur cellule

Merci Pierrot93

Grâce à ton code, j'ai pu faire fonctionné ma macro comme je le souhiatais.
Je trouve bien mes numéros de lignes en fonction des valeurs de cellule recherchées.

Merci encore.
Cordialement.
 

Discussions similaires

Réponses
3
Affichages
449

Statistiques des forums

Discussions
311 545
Messages
2 080 564
Membres
101 256
dernier inscrit
Ludmi