Aller au premier chiffre "1" d'une colonne

[herve80]

Bonjour,

Soit une rangée de chiffre "1" dans le fichier ci-joint.

En appuyant sur F1, on arrive au dernier chiffre "3". Je veux faire la même chose pour le chiffre "1", mais Excel me fait arriver au dernier chiffre "1" avec la méthode de tri.

Pourriez-vous modifier la macro, afin que F1 conduise au premier "1" ?

NB : Remplacez d'abord un "1" par un "3" puis faites F1 quand Excel selectionne toute la colonne, pour constater qu'Excel vous amène au chiffre 3.

Merci d'y regarder !

 

[Eric 45]

Re : Aller au premier chiffre "1" d'une colonne

Bonsoir à tous
Bonsoir herve80

Essaie avec ce code :

Sub aller_prem_1()
Set c = Range("a:a").Find(1, LookIn:=xlValues, Lookat:=xlWhole)
Range(c.Address).Select
End Sub

Eric

 

[herve80]

Re : Aller au premier chiffre "1" d'une colonne

Eric,

J'ai essayé, ça fonctionne.

Du très bon travail, merci à toi ! 😉