Помогите со скриптом

Тема в разделе "Visual Basic", создана пользователем SoFuWa, 20 мар 2009.

Статус темы:
Закрыта.
  1. SoFuWa

    SoFuWa Гость

    Решил автоматизировать примитивный процесс, надоело руками делать.
    Есть список номеров и нужно сравнивать ячейку на содержание в ней одного из номеров, ячейки формата "общий", мне нужно не точное равенство, а что бы стаивлась галочка если в ячейки содержится такие-то цифры.
    В визуал бейсике ничего почти не понимаю
    вот примерно такой смысл
    For i = 1 To 3
    ActiveCell.Select
    If ActiveCell.Value = 2867657 Then
    ActiveCell.Offset(0, -1).Range("A1").Select
    ActiveCell = "x"
    ActiveCell.Offset(0, 1).Range("A1").Select
    End If
    ActiveCell.Offset(1, 0).Range("A1").Select
    Next i
    End Sub

    Но требуется, проверять не на равенство и не одно числа, а сверять на содержание с группой ячеек в которой числа, подскажите хоть синтаксис и дальше я сам сварганю. Как можно сверять с групой ячеек по очереди? Понятно что цикл внутри цикла, но как предедвигатся от ячейки к ячейке в списке значений, ActiveCell то я уже использую на первом списке. Огромное спасибо заранее

    P.S. Нет функция СЧЕТЕСЛИ неподходит, список номеров от 200 до 500.
    Да нужно именно в VBA
     
Загрузка...
Статус темы:
Закрыта.

Поделиться этой страницей