VBA Range.Find ne détecte pas mon texte

Bonjour à tous,

dans mon fichier se trouve en colonne A une liste composée des termes "Disponibles", "Indisponibles" et "Inconnue" créée par une macro.

Je souhaite obtenir le numéro de ligne de la première itération de "Disponibles" et j'utilise donc Range("A1:A264").Find("Disponibles").Row

Or la macro ne fonctionne pas et me donne 2 pour résultat par défaut.

J'ai remplacé les mots par 1,2 et 3 pour essayer et là la macro fonctionne normalement.

Est-ce que j'utilise mal cette méthode ou y a t-il un souci ailleurs ?

Voici la partie du fichier ou le problème est visible:

8test.xlsm (15.65 Ko)

Merci pour votre aide.

Bonjour,

testes ce code :

Sub Test()

    Dim Plage As Range
    Dim Cel As Range

    With Worksheets("Feuil1")

        'défini la plage sur la colonne A à partir de A1
        Set Plage = .Range(.Cells(1, 1), .Cells(.Rows.Count, 1).End(xlUp))

        'effectue la recherche
        Set Cel = Plage.Find("Disponibles", , xlValues, xlWhole)

    End With

    'il faut tester si trouvée avant d'en utiliser les propriétés
    If Not Cel Is Nothing Then MsgBox Cel.Address(0, 0)

End Sub

Merci à vous pour cette réponse rapide et fonctionnelle.

Content de t'avoir aidé

Rechercher des sujets similaires à "vba range find detecte pas mon texte"