j'utilisse une fonction de recherche que je passe en paramêtre a une fonction (FTN_Valide_copie). mon problème c'est quand je reviens dans mon sub et que je recommance ma recherche ...Excel recommance du début avez vous une idée pour me repositionné sur l'enregistrement suivant ?
voici le code
With Worksheets("Gabarit M-O Resp." ).Range("a1:a500" )
Columns("A:A" ).Select Set AA = .Find("LSA Consultation du catalogue", LookIn:=xlValues) BB = AA ' BB= 1er record Sheets("Gabarit M-O Resp." ).Select Do
Marsh Posté le 22-09-2005 à 15:34:50
bonjour a tous
j'utilisse une fonction de recherche que je passe en paramêtre a une fonction (FTN_Valide_copie). mon problème c'est quand je reviens dans mon sub et que je recommance ma recherche ...Excel recommance du début avez vous une idée pour me repositionné sur l'enregistrement suivant ?
voici le code
With Worksheets("Gabarit M-O Resp." ).Range("a1:a500" )
Columns("A:A" ).Select
Set AA = .Find("LSA Consultation du catalogue", LookIn:=xlValues)
BB = AA ' BB= 1er record
Sheets("Gabarit M-O Resp." ).Select
Do
FTN_Valide_copie (Selection.Find(What:="LSA Consultation du catalogue", After:=ActiveCell, _
LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, _
SearchDirection:=xlNext, MatchCase:=True, SearchFormat:=True).Activate)
Loop While Not AA Is Nothing Or BB <> AA
End With