NamedRange.FindNext(Object) Méthode
Définition
Important
Certaines informations portent sur la préversion du produit qui est susceptible d’être en grande partie modifiée avant sa publication. Microsoft exclut toute garantie, expresse ou implicite, concernant les informations fournies ici.
Continue une recherche commencée avec la méthode Find(Object, Object, Object, Object, Object, XlSearchDirection, Object, Object, Object).
public Microsoft.Office.Interop.Excel.Range FindNext (object After);
abstract member FindNext : obj -> Microsoft.Office.Interop.Excel.Range
Public Function FindNext (Optional After As Object) As Range
Paramètres
- After
- Object
Cellule après laquelle démarrer la recherche. Cela correspond à la position de la cellule active lorsqu'une recherche est effectuée à partir de l'interface utilisateur. Notez qu’il After
doit s’agir d’une seule cellule dans le NamedRange contrôle. Souvenez-vous que la recherche commence après cette cellule ; la cellule spécifiée ne fait pas l'objet d'une recherche tant que la méthode n'est pas revenue à cette cellule. Si cet argument n'est pas spécifié, la recherche démarre après la cellule située dans l'angle supérieur gauche du contrôle NamedRange.
Retours
Objet Range qui représente une cellule contenant les informations spécifiées.
Exemples
L’exemple de code suivant utilise la Find méthode pour rechercher la première cellule avec la valeur Seashell
dans un NamedRange contrôle. L’exemple utilise ensuite les FindNext méthodes et FindPrevious pour rechercher la cellule suivante avec la valeur Seashell
, puis revenir à la cellule d’origine. Enfin, l’exemple utilise la Cut méthode pour couper le contenu de la première cellule avec la valeur Seashell
et le coller dans la cellule B1.
Cet exemple concerne une personnalisation au niveau du document.
private void FindValue()
{
this.Range["A1"].Value2 = "Barnacle";
this.Range["A2"].Value2 = "Seashell";
this.Range["A3"].Value2 = "Star Fish";
this.Range["A4"].Value2 = "Seashell";
this.Range["A5"].Value2 = "Clam Shell";
Microsoft.Office.Tools.Excel.NamedRange namedRange1 =
this.Controls.AddNamedRange(this.Range["A1", "A5"],
"namedRange1");
// Find the first occurrence of "Seashell".
Excel.Range Range1 = namedRange1.Find("Seashell",
Excel.XlLookAt.xlWhole, Excel.XlSearchOrder.xlByColumns,
Microsoft.Office.Interop.Excel.XlSearchDirection.xlNext,
false);
// Find the next occurrence of "Seashell".
Range1 = namedRange1.FindNext(Range1);
// Return to the first occurrence of "Seashell".
Range1 = namedRange1.FindPrevious(Range1);
// Cut the range with the first "Seashell" and copy it to cell B1.
Microsoft.Office.Tools.Excel.NamedRange namedRange2 =
this.Controls.AddNamedRange(Range1, "namedRange2");
namedRange2.Cut(this.Range["B1"]);
}
Private Sub FindValue()
Me.Range("A1").Value2 = "Barnacle"
Me.Range("A2").Value2 = "Seashell"
Me.Range("A3").Value2 = "Star Fish"
Me.Range("A4").Value2 = "Seashell"
Me.Range("A5").Value2 = "Clam Shell"
Dim namedRange1 As Microsoft.Office.Tools.Excel.NamedRange _
= Me.Controls.AddNamedRange(Me.Range("A1", "A5"), _
"namedRange1")
' Find the first occurrence of "Seashell".
Dim Range1 As Excel.Range = namedRange1.Find("Seashell", , , _
Excel.XlLookAt.xlWhole, Excel.XlSearchOrder.xlByColumns, _
Microsoft.Office.Interop.Excel.XlSearchDirection.xlNext, _
False, False, )
' Find the next occurrence of "Seashell".
Range1 = namedRange1.FindNext(Range1)
' Return to the first occurrence of "Seashell".
Range1 = namedRange1.FindPrevious(Range1)
' Cut the range with the first "Seashell" and copy it to cell B1.
Dim namedRange2 As Microsoft.Office.Tools.Excel.NamedRange _
= Me.Controls.AddNamedRange(Range1, "namedRange2")
namedRange2.Cut(Me.Range("B1"))
End Sub
Remarques
Recherche la cellule suivante qui correspond aux mêmes conditions que la Find méthode.
Cette méthode n’affecte pas la sélection ou la cellule active.
Lorsque la recherche atteint la fin de la plage de recherche spécifiée, elle est encapsulée au début de la plage. Pour arrêter une recherche lorsque ce wraparound se produit, enregistrez l’adresse de la première cellule trouvée, puis testez chaque adresse de cellule trouvée successive par rapport à cette adresse enregistrée.
Paramètres facultatifs
Pour plus d’informations sur les paramètres facultatifs, consultez Paramètres facultatifs dans les solutions Office.