проблема: ошибка 424 или Invalid or unqualified reference

Гость

21.02.2010 18:34:03

Dim zxc As Range
Set zxc = Cells.Find(What:="12", After:=ActiveCell, LookIn:=xlValues _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate

ошибка 424
а если так
Set zxc = .Find(What:="12", LookIn:=xlValues)

то выдает ошибку "Invalid or unqualified reference"

в чем может быть причина. подскажите, пожалуйста.

Юрий М Модератор Сообщений: 60982 Регистрация: 14.09.2012 Контакты см. в профиле	#2 21.02.2010 18:39:04 Нужно просто найти ячейку со значением "12"? А дальше что делать?

Юрий М Модератор Сообщений: 60982 Регистрация: 14.09.2012 Контакты см. в профиле	#3 21.02.2010 18:43:05 Вот переменную и активируем :-)

Q Гость	#4 21.02.2010 18:46:40 {quote}{login=The_Prist}{date=21.02.2010 06:41}{thema=}{post}А здесь Set zxc = Cells.Find(What:="12", After:=ActiveCell, LookIn:=xlValues _ , LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _ MatchCase:=False, SearchFormat:=False).Activate нужно убрать .Activate в конце. Вы ж значение переменной присваиваете.{/post}{/quote} Спасибо!

Читают тему