Решил автоматизировать примитивный процесс, надоело руками делать.
Есть список номеров и нужно сравнивать ячейку на содержание в ней одного из номеров, ячейки формата "общий", мне нужно не точное равенство, а что бы стаивлась галочка если в ячейки содержится такие-то цифры.
В визуал бейсике ничего почти не понимаю
вот примерно такой смысл
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

Я лично ничего не понял... телепаты, где вы?

вот пример в файле. Там уже есть скрипт, который перебирает варианты, но как сделать что бы было сравнение не на точное равенство а на содержание в ячейке чисел, которые справа, два числа (только в примере  2 числа ест-но  )

Добавлено через 7 минут и 7 секунд
вообщем то в примере почти все сделал уже,  кроме сравнения на содержание
Sub asd()
For i = 2 To 4
For n = 2 To 3
If Cells(i, 2).Value = Cells(n, 7).Value Then
Cells(i, 1).Select
ActiveCell = "x"
End If
Next n
Next i
End Sub


В строке If Cells(i, 2).Value = Cells(n, 7).Value Then нужно чтоб не равенство проверялось а содержание числа которое в ячейке Cells(n, 7).Value в ячейке Cells(i, 2).Value.

Это сообщение отредактировал(а) SoFuWa - 20.3.2009, 17:19

Присоединённый файл ( Кол-во скачиваний: 3 )
 primer.rar 11,40 Kb

Вот такое?


Присоединённый файл ( Кол-во скачиваний: 3 )
 primer.zip 6,55 Kb

ОРОМНОЕ спасибо, если вы туда добавите еще один диапазон то будет ваще офигенно     
Ну я сразу че то тормазнул, типа нужно сравнивать не с одним диапазоном а с двумя, и ставить не "х" а другой какой нибудь знак.
Вообщем я примерно понял как функция работает, если вы добавите туда еще один диапазон я сам смогу дальше другие добавлять.

Присоединённый файл ( Кол-во скачиваний: 1 )
 primer.rar 7,40 Kb

Спасибо еще раз, я сам уже разобрался с функцией =)