Méthode Range.FindPrevious (Excel)

Poursuit une recherche qui a été lancée avec la méthode Find . Elle recherche la cellule précédente qui correspond aux mêmes critères et renvoie un objet Range qui la représente. N’affecte pas la sélection ou la cellule active.

Syntaxe

expression. FindPrevious (Before)

expression Variable représentant un objet Range.

Paramètres

Nom	Requis/Facultatif	Type de données	Description
Before	Facultatif	Variant	Cellule devant laquelle vous souhaitez effectuer une recherche. Cela correspond à la position de la cellule active lorsqu’une recherche est effectuée à partir de l’interface utilisateur. Notez que Before doit être une seule cellule dans la plage. N’oubliez pas que la recherche commence avant cette cellule ; la cellule spécifiée ne fait pas l’objet d’une recherche tant que la méthode n’est pas renvoyée à cette cellule. Si cet argument n’est pas spécifié, la recherche commence avant la cellule supérieure gauche de la plage.

Valeur renvoyée

Plage

Remarques

Lorsque la recherche atteint le début de la plage de recherche spécifiée, elle revient à la fin de cette plage. Pour arrêter une recherche lorsqu’elle recommence au début, enregistrez l’adresse de la première cellule trouvée, puis testez chaque adresse de cellule trouvée successive avec cette adresse enregistrée.

Exemple

Cet exemple montre comment utiliser la méthode FindPrevious avec les méthodes Find et FindNext. Avant d’exécuter cet exemple, assurez-vous que Sheet1 contient au moins deux occurrences du mot Phoenix dans la colonne B.

Sub FindTest() 
 Dim fc As Range 
 Set fc = Worksheets("Sheet1").Columns("B").Find(what:="Phoenix") 
 MsgBox "The first occurrence is in cell " & fc.Address 
 Set fc = Worksheets("Sheet1").Columns("B").FindNext(after:=fc) 
 MsgBox "The next occurrence is in cell " & fc.Address 
 Set fc = Worksheets("Sheet1").Columns("B").FindPrevious(after:=fc) 
 MsgBox "The previous occurrence is in cell " & fc.Address 
End Sub

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.