Страницы: 1
RSS
Смещение относительно объединенной ячейки [VBA], туплю
 
На листе N блоков нужной информации. Начало блока - объединенная ячейка, на 10 столбцов. Нахожу ее через Find (по ключевому слову). Адрес ее, предположим, $A$5
Дальше мне нужно из следующей строки взять несколько значений (в ней ячейки не объединены). Например, из третьей ячейки. Делаю так:
Код
x = rr.Offset(1, 2).Value
Получаю значение 12-й ячейки следующей строки, вместо 3-й.
Ок, делаю так:
Код
x = rr.Cells (1).Offset(1, 2).Value
'Или
x = rr.MergeArea.Cells(1).Offset(1, 2).Value
в обоих случаях результат тот же. Вылечилось только после Unmerge.
Почему? Мне не тяжело, но хорошо, что файлы были не защищены от изменений, а их несколько сотен штук в цикле.
Как в таком случае правильно бороться? Что-то не соображу.

Прошу извинить, что без файла - пишу с телефона.
F1 творит чудеса
 
А примерчик можно?
There is no knowledge that is not power
 
Код
x = rr.Cells(2, 3).Value
 
Код
x = rr.Offset(1, 0).Offset(0, 2).Value 
 
Cells(rr.Row + 1, rr.Column + 2)
 
Спасибо за советы, думаю, все подойдут! Доберусь до файла - опробую
F1 творит чудеса
Страницы: 1
Наверх