Metodo NamedRange.FindPrevious

Articolo
08/11/2011

Continua una ricerca avviata con il metodo Find.

Spazio dei nomi: Microsoft.Office.Tools.Excel
Assembly: Microsoft.Office.Tools.Excel (in Microsoft.Office.Tools.Excel.dll)

Sintassi

'Dichiarazione
Function FindPrevious ( _
    After As Object _
) As Range

Range FindPrevious(
    Object After
)

Parametri

After
Tipo: System.Object
Cella prima della quale si desidera eseguire la ricerca.Corrisponde alla posizione della cella attiva quando una ricerca viene eseguita dall'interfaccia utente.Il parametro After deve essere una singola cella nel controllo NamedRange.Tenere presente che la ricerca viene avviata prima di 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 prima della cella superiore sinistra nel controllo NamedRange.

Valore restituito

Tipo: Microsoft.Office.Interop.Excel.Range
Oggetto Microsoft.Office.Interop.Excel.Range che rappresenta una cella contenente le informazioni specificate.

Note

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

Questo metodo non influisce sulla selezione o sulla cella attiva.

Quando la ricerca raggiunge l'inizio dell'intervallo di ricerca specificato, torna alla fine dell'intervallo. In questo caso, per interrompere la ricerca, salvare l'indirizzo della prima cella trovata, quindi verificare ciascun indirizzo delle successive celle trovate rispetto all'indirizzo salvato.

Parametri facoltativi

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

Esempi

Nell'esempio di codice riportato di seguito viene utilizzato il metodo Find per trovare la prima cella contenente il valore Seashell in un controllo NamedRange. Vengono quindi utilizzati i metodi FindNext e FindPrevious per trovare la cella successiva contenente il valore Seashell e tornare alla cella di origine. Viene infine utilizzato il metodo Cut per tagliare il contenuto della prima cella contenente il valore Seashell e incollarlo nella cella B1.

Questo esempio è valido per una personalizzazione a livello di documento.

    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

private void FindValue()
{
    this.Range["A1", missing].Value2 = "Barnacle";
    this.Range["A2", missing].Value2 = "Seashell";
    this.Range["A3", missing].Value2 = "Star Fish";
    this.Range["A4", missing].Value2 = "Seashell";
    this.Range["A5", missing].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", missing, missing,
        Excel.XlLookAt.xlWhole, Excel.XlSearchOrder.xlByColumns,
        Microsoft.Office.Interop.Excel.XlSearchDirection.xlNext,
        false, false, missing);

    // 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", missing]);
}

Sicurezza di .NET Framework

Attendibilità totale per il chiamante immediato. Impossibile utilizzare questo membro in codice parzialmente attendibile. Per ulteriori informazioni, vedere Utilizzo di librerie da codice parzialmente attendibile.

Vedere anche

Riferimenti

NamedRange Interfaccia

Spazio dei nomi Microsoft.Office.Tools.Excel

Share via