Не могу понять почему функция отрабатывает только один раз, т.е. первый раз находит, что надо а второй нет....


НСтрока = Sheet.Columns(4).Find(Формат(Выборка.Период,"ЧЦ=2; ЧВН=; ДФ=dd.MM.yyyy"));
НОбласть = Sheet.Range(Sheet.Cells.Item(НайденнаяСтрока.row,4), Sheet.Cells.Item(НайденнаяСтрока.row,28));
НОбласть.Cells(1,1).Value  = Выборка.Период;

Первый проход цикла:  находит значение даты на листе, второй проход: другая дата не находится, хотя она там точно есть.

То ли после первого поиска область выделяется и второй раз ищется уже в ней (тогда как снять выделение), то ли ещё что-то...

Хелп!
Заранее благодарен.

цикл говоришь...

Да, цикл.
В зависимости от даты в выборке заполняю определенную ячейку определенного листа книги Excel.
Так нельзя?

ф1

Заклинанье "ф1" пробовал, не разобрался, также пробовал заклинание "гуглить" - также безрезультатно.

Помогите, а я волшебное слово знаю - пожалуйста!

и где цикл?

я бы сразу взял Range, и уже к нему бы применил Replace

Мне бы find освоить ....

(7) нафига тебе файнд, когда тебе нужен риплэйс?

http://msdn.microsoft.com/en-us/library/office/bb178865(v=office.12).aspx

Function Find(What, [After], [LookIn], [LookAt], [SearchOrder], [SearchDirection As XlSearchDirection = xlNext], [MatchCase], [MatchByte], [SearchFormat]) As Range

what = что искать
after = левая верхняя ячейка начала поиска в указанном диапазоне
lookin = искать в формулах или в значениях
lookat = совпадения поиска точное или частичное
SearchOrder = поиск по строкам или по столбцам
SearchDirectiоn = направление поиска
MatchCase = учитывать регистр букв
SearchFormat = формат поиска

(8) У меня алгоритм следующий:
1.) Ищется строка, содержащая дату
2.) В найденной строке проставляются в определенные колонки значения.
Немного изменю фрагмент кода, чтоб не вводить в заблуждение:
НСтр = Sheet.Columns(4).Find(Формат(Выборка.Период,"ЧЦ=2; ЧВН=; ДФ=dd.MM.yyyy"));
НОбл = Sheet.Range(Sheet.Cells.Item(НСтр.row,4), Sheet.Cells.Item(НСтр.row,28));
НОбл.Cells(1,3).Value  = Выборка.СуммаПродаж;
НОбл.Cells(1,4).Value  = Выборка.СуммаДЗ;
НОбл.Cells(1,5).Value  = Выборка.СуммаОплат;
и т.д.

(10) Вываливается ошибка, когда я передаю в Find больше одного параметра ...

(11)>Вываливается ошибка, когда я передаю в Find больше одного параметра ...

1. Параметры пропускать нельзя
2. Вместо передачи символьных параметров нужно использовать числовые константы.
Например:
Параметр LookIn может принимать значения:

xlComments
xlFormulas
xlValues

Из 1С надо передавать, соответственно:
-4144
-4123
-4163

(12) Чесслово, пробовал

up

апну ещё разок ...

Не оставьте в неведении, пожалуйста!!!

сделай по-другому: в запрос тяни часть таблицы excel, а из запроса получишь уже номер строки

(17) что-то это как-то сложновато, по-моему.
Пример кода ради интересе бы глянул, но хотел бы с find()'ом разобраться

Не сочтите за назойливость, но проблему пока решить не удается...
Спасибо