NamedRange.FindPrevious – metoda

Článek
01/03/2014

Pokračuje v hledání, které bylo zahájeno s Find metody.

Obor názvů: Microsoft.Office.Tools.Excel
Sestavení: Microsoft.Office.Tools.Excel (v Microsoft.Office.Tools.Excel.dll)

Syntaxe

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

Range FindPrevious(
    Object After
)

Parametry

After
Typ: System.Object
Buňka, před který chcete hledat.To odpovídá umístění aktivní buňky při vyhledávání se provádí z uživatelského rozhraní.Všimněte si, že After musí být v jedné buňce NamedRange ovládacího prvku.Mějte na paměti, že hledání začne před této buňky; Zadaná buňka není prohledána, dokud metoda neobteče zpět do této buňky.Pokud není tento argument zadán, hledání začíná před levou horní buňku v NamedRange ovládacího prvku.

Vrácená hodnota

Typ: Microsoft.Office.Interop.Excel.Range
A Microsoft.Office.Interop.Excel.Range objekt, který představuje buňku obsahující požadované informace.

Poznámky

Vyhledá předchozí buňky odpovídá za stejných podmínek jako Find metody.

Tato metoda nemá vliv na výběr nebo aktivní buňky.

Začátek rozsahu zadané hledání dosáhne hledání bude zalomen okolo konec rozsahu.Zastavit hledání při výskytu tohoto wraparound, uložit adresu první nalezený buňky a otestujte každý sobě adresu najít buňky proti této uložené adresy.

Volitelné parametry

Informace o nepovinných parametrů naleznete v tématu Volitelné parametry v řešeních pro systém Office.

Příklady

Následující příklad kódu používá Find způsob hledání na první buňku s hodnotou Seashell v NamedRange ovládacího prvku.V příkladu se pak používá FindNext a FindPrevious metody najít další buňky s hodnotou Seashell a pak se vraťte na původní buňky.Nakonec příklad používá Cut metoda, chcete-li vyjmout obsah první buňky s hodnotou Seashell a vložte jej do buňky B1.

Tento příklad je pro vlastní úpravy úrovni dokumentu.

    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"].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"]);
}

Zabezpečení rozhraní .NET Framework

Plná důvěra přímému volajícímu. Částečně zabezpečený kód nemůže tento člen použít. Další informace naleznete v tématu Používání knihoven z částečně důvěryhodného kódu.

Viz také

Referenční dokumentace

NamedRange Rozhraní

Microsoft.Office.Tools.Excel – obor názvů

Sdílet prostřednictvím