NamedRange.FindNext(Object) Metodo

  • Riferimento

Definizione

Spazio dei nomi:
Microsoft.Office.Tools.Excel
Assembly:
Microsoft.Office.Tools.Excel.dll

Continua una ricerca avviata con il metodo 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

Parametri

After
Object

Cella dopo la quale si desidera eseguire la ricerca. Corrisponde alla posizione della cella attiva quando una ricerca viene eseguita dall'interfaccia utente. Si noti che After deve essere una singola cella nel NamedRange controllo. Tenere presente che la ricerca viene avviata dopo questa cella. La ricerca verrà eseguita nella cella specificata solo quando il metodo completerà il ciclo e tornerà a questa cella. Se questo argomento non è specificato, la ricerca verrà avviata dopo la cella nell'angolo superiore sinistro del controllo NamedRange.

Restituisce

Range

Oggetto Range che rappresenta una cella contenente le informazioni specificate.

Esempio

Nell'esempio di codice seguente viene usato il Find metodo per trovare la prima cella con il valore Seashell in un NamedRange controllo. Nell'esempio vengono quindi usati i FindNext metodi e FindPrevious per trovare la cella successiva con il valore Seashell e quindi tornare alla cella originale. Infine, l'esempio usa il Cut metodo per tagliare il contenuto della prima cella con il valore Seashell e incollarlo nella cella B1.

Questo esempio è relativo a una personalizzazione a livello di documento.

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

Commenti

Trova la cella successiva che corrisponde alle stesse condizioni del Find metodo.

Questo metodo non influisce sulla selezione o sulla cella attiva.

Quando la ricerca raggiunge la fine dell'intervallo di ricerca specificato, viene eseguito il wrapping fino all'inizio dell'intervallo. Per arrestare una ricerca quando si verifica questo problema, salvare l'indirizzo della prima cella trovata, quindi testare ogni indirizzo di cella trovato successivo rispetto a questo indirizzo salvato.

Parametri facoltativi

Per informazioni sui parametri facoltativi, vedere parametri facoltativi nelle soluzioni Office.

Si applica a