Metoda NamedRange.FindNext —

  • Artykuł

Trwa wyszukiwanie, które zostało zapoczątkowane z Find metody.

Przestrzeń nazw:  Microsoft.Office.Tools.Excel
Zestaw:  Microsoft.Office.Tools.Excel (w Microsoft.Office.Tools.Excel.dll)

Składnia

'Deklaracja
Function FindNext ( _
    After As Object _
) As Range

Range FindNext(
    Object After
)

Parametry

  • After
    Typ: System.Object
    Komórka, po którym chcesz przeszukać.Odpowiada to położenie aktywnej komórki po zakończeniu wyszukiwania z interfejsu użytkownika.Należy zauważyć, że After musi być pojedynczą komórką w NamedRange kontroli.Należy pamiętać, że wyszukiwanie rozpoczyna się od tej komórki. nie była przeszukiwana określonej komórki, dopóki metoda otoczona wróć do tej komórki.Jeśli ten argument nie zostanie określony, wyszukiwanie rozpoczyna się po komórkę w lewym górnym rogu NamedRange kontroli.

Wartość zwracana

Typ: Microsoft.Office.Interop.Excel.Range
A Microsoft.Office.Interop.Excel.Range obiekt, który reprezentuje komórkę zawierającą określone informacje.

Uwagi

Wyszukuje następną komórkę, która odpowiada takim samym warunkom jak Find metody.

Ta metoda nie wpływa na wybór lub aktywnej komórki.

Gdy wyszukiwanie dojdzie do końca zakresu wyszukiwania, otaczająca początek zakresu.Aby zatrzymać wyszukiwanie po wystąpieniu tego wraparound, Zapisz adres pierwszej komórki znalezione, a następnie przetestuj każdy kolejnych adres komórki znalezione przed tym zapisany adres.

Parametry opcjonalne

Informacje na temat parametrów opcjonalnych, zobacz Parametry opcjonalne w rozwiązaniach Office.

Przykłady

Następujący kod w przykładzie wykorzystano Find Metoda znajdowania pierwszą komórkę z wartością Seashell w NamedRange kontroli.Następnie w przykładzie FindNext i FindPrevious metod, aby znaleźć następną komórkę z wartością Seashell , a następnie powrócić do oryginalnego komórki.Wreszcie, w przykładzie użyto Cut sposobu na wycinanie zawartości pierwszej komórki z wartością muszli i wklej go w komórce B1.

W tym przykładzie jest dla dostosowania poziomu 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"]);
}

Zabezpieczenia programu .NET Framework

Zobacz też

Informacje

NamedRange Interfejs

Przestrzeń nazw Microsoft.Office.Tools.Excel