Discussion :

[belfaigore]

Bonjour,

Je souhaite retrouver dans une zone de selection l'adresse de la cellule d'une valeur. J'ai écrit la macro suivante:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
        Dim FirstAddress As String
        Dim c As Range
        With Range("A1:N100")
            Set c = .Find("Colonne 1", LookIn:=xlValues)
            If Not c Is Nothing Then
                FirstAddress = c.Address
                Do
                    MsgBox "Trouvé à " & c.address
                    Set c = .FindNext(c)
                Loop While Not c Is Nothing And c.Address <> FirstAddress
            End If
        End With

Le probleme étant que la fonction ne renvoie rien pour la recherche "Colonne 1" qui existe bien et se trouve en A1 alors qu'elle marche parfaitement pour toutes les autres valeurs (Colonne 2 en B2 est bien identifié par .Find, etc...) Là je ne comprend pas. Si quelqu'un a une solution ?

[SfJ5Rpw8]

et si à la suite d'une recherche infructueuse... tu effectue une nouvelle recherche en utilisant le menu excel (Ctrl F...) , sans changer les diverses options (majuscules...) , la recherche aboutie ?