NamedRange.FindNext – 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 FindNext ( _
    After As Object _
) As Range

Range FindNext(
    Object After
)

Parametry

After
Typ: System.Object
Buňky, 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 v jedné buňce NamedRange ovládacího prvku.Mějte na paměti, že hledání začne po této buňky; Zadaná buňka není prohledána, dokud metoda neobteče zpět do této buňky.Pokud tento argument nezadáte, spustí hledání po buňku v levém horním rohu 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

Najde další buňku, která odpovídá za stejných podmínek jako Find metody.

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

Konec rozsahu zadaného hledání dosáhne hledání na začátek rozsahu jej obtéká kolem.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