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

Range FindNext(
    Object After
)

Parametry

After
Typ: System.Object
Buňka, po jehož uplynutí 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 na jedinou buňku v NamedRange ovládacího prvku.Mějte na paměti, že bude vyhledávání zahájeno po této buňky; 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á 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í zadané informace.

Poznámky

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

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

Konec rozsahu zadanému vyhledávacímu dosáhne hledání bude zalomen okolo začátek 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