NamedRange.FindNext(Object) Метод

Определение

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

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

Параметры

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.

Применяется к