Méthode Range.FindPrevious (Excel)

Poursuit une recherche qui a été commencé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

. FindPrevious (Before)

expression Variable représentant un objet Range.

Paramètres

Nom Requis/Facultatif Type de données Description
Before Facultatif Variant Cellule avant 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 qu’Before doit être une seule cellule de la plage.

N’oubliez pas que la recherche commence avant cette cellule . La cellule spécifiée n’est pas recherché tant que la méthode n’est pas resserée sur 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écutez cet exemple, assurez-vous que la feuille Sheet1 contient au moins deux occurrences du mot « Word » 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.