NamedRange.FindNext(Object) Methode

Referenz

Definition

Namespace:: Microsoft.Office.Tools.Excel

Assembly:: Microsoft.Office.Tools.Excel.dll

Wichtig

Einige Informationen beziehen sich auf Vorabversionen, die vor dem Release ggf. grundlegend überarbeitet werden. Microsoft übernimmt hinsichtlich der hier bereitgestellten Informationen keine Gewährleistungen, seien sie ausdrücklich oder konkludent.

Setzt die mit der Find(Object, Object, Object, Object, Object, XlSearchDirection, Object, Object, Object)-Methode begonnene Suche fort.

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

Parameter

After: Object

Die Zelle nach der Zelle, die Sie suchen möchten. Dies entspricht der Position der aktiven Zelle, wenn eine Suche über die Benutzeroberfläche durchgeführt wird. Beachten Sie, dass After eine einzelne Zelle im NamedRange Steuerelement sein muss. Beachten Sie auch, dass die Suche nach dieser Zelle beginnt, wobei die angegebene Zelle erst dann durchsucht wird, wenn die Methode erneut diese Zelle erreicht hat. Wenn dieses Argument nicht angegeben wird, beginnt die Suche (räumlich betrachtet) nach der Zelle in der linken oberen Ecke des NamedRange-Steuerelements.

Gibt zurück

Range

Ein Range-Objekt, das eine Zelle darstellt, die die angegebenen Informationen enthält.

Beispiele

Im folgenden Codebeispiel wird die Find -Methode verwendet, um die erste Zelle mit dem Wert Seashell in einem NamedRange Steuerelement zu finden. Im Beispiel werden dann die FindNext Methoden und FindPrevious verwendet, um die nächste Zelle mit dem Wert Seashell zu finden und dann zur ursprünglichen Zelle zurückzukehren. Schließlich wird im Beispiel die Cut -Methode verwendet, um den Inhalt der ersten Zelle mit dem Wert Seashell zu schneiden und in Zelle B1 einzufügen.

Dieses Beispiel gilt für eine Anpassung auf Dokumentebene.

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

Hinweise

Sucht die nächste Zelle, die den gleichen Bedingungen wie die Find -Methode entspricht.

Diese Methode wirkt sich nicht auf die Auswahl oder die aktive Zelle aus.

Wenn die Suche das Ende des angegebenen Suchbereichs erreicht, wird sie bis zum Anfang des Bereichs umschließen. Um eine Suche zu beenden, wenn dieser Umbruch auftritt, speichern Sie die Adresse der ersten gefundenen Zelle, und testen Sie dann jede aufeinanderfolgende Gefundene Zellenadresse mit dieser gespeicherten Adresse.

Optionale Parameter

Informationen zu optionalen Parametern finden Sie unter Optionale Parameter in Office-Projektmappen.

Gilt für:

Freigeben über