NamedRange.FindPrevious – metoda

Článek
05/14/2013

Pokračuje v hledání, která byla zahájena s Find metoda.

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 vyhledat.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 na jedinou buňku v NamedRange ovládacího prvku.Mějte na paměti, že bude vyhledávání zahájeno před tuto buňku; Zadaná buňka nebude prohledávat, dokud metoda neobteče zpět do této buňky.Pokud není tento parametr 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í zadané informace.

Poznámky

Najde předchozí buňky, která odpovídá za stejných podmínek jako Find metoda.

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

Začátek rozsahu zadanému vyhledávacímu dosáhne hledání bude zalomen okolo konec rozsahu.Chcete-li zastavit vyhledávání, dojde-li k této wraparound, uložit adresu první nalezené buňky a proveďte test jednotlivých po sobě jdoucích adresu nalézt buňky proti této uložené adresy.

Volitelné parametry

Informace o volitelných parametrů naleznete v tématu Volitelné parametry v Office Solutions.

Příklady

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

V tomto příkladu je úroveň dokument přizpůsobení.

    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