NamedRange.FindNext(Object) Метод

Определение

Пространство имен:

Microsoft.Office.Tools.Excel

Сборка:

Microsoft.Office.Tools.Excel.dll

Продолжает поиск, начатый при помощи метода Find(Object, Object, Object, Object, Object, XlSearchDirection, Object, Object, Object).

public Microsoft.Office.Interop.Excel.Range FindNext (object After);

abstract member FindNext : obj -> Microsoft.Office.Interop.Excel.Range

Public Function FindNext (Optional After As Object) As Range

Параметры

After

Object

Ячейка, после которой следует начать поиск. Это соответствует положению активной ячейки при выполнении поиска из пользовательского интерфейса. Обратите внимание, что After в элементе управления должна быть одна ячейка NamedRange . Помните, что поиск начинается после этой ячейки; поиск указанной ячейки не осуществляется до тех пор, пока метод не вернется к этой ячейке. Если этот аргумент не указывается, поиск начинается после ячейки в верхнем левом углу элемента управления NamedRange.

Возвращаемое значение

Range

Объект Range, представляющий ячейку, содержащую указанные данные.

Примеры

В следующем примере кода метод используется для Find поиска первой ячейки со значением Seashell в элементе NamedRange управления . Затем в примере используются FindNext методы и FindPrevious , чтобы найти следующую ячейку со значением Seashell , а затем вернуться к исходной ячейке. Наконец, в примере используется Cut метод , чтобы вырезать содержимое первой ячейки со значением Seashell и вставить его в ячейку B1.

Этот пример предназначен для настройки на уровне документа.

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

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

Комментарии

Находит следующую ячейку, соответствующую тем же условиям, что и Find метод .

Этот метод не влияет на выделение или активную ячейку.

Когда поиск достигает конца указанного диапазона поиска, он переносится в начало диапазона. Чтобы остановить поиск при возникновении этого обходного пути, сохраните адрес первой найденной ячейки, а затем проверьте каждый последующий адрес найденной ячейки с этим сохраненным адресом.

Необязательные параметры

Сведения о необязательных параметрах см. в разделе Необязательные параметры в решениях Office.