Добрый день!
Имеется таблица с объединёнными ячейками по вертикали. Требуется скопировать имеющуюся строку в эту таблицу.
Последовательность действий видится такой:
1. Выделить нужную строку, которая проходит через объединённые ячейки по вертикали.
2. Скопировать.
3. Вставить на одну строку выше.
4. Сбросить диапазон копирования.
Метод Select для 1-го пункта не подходит, поскольку выделяет не одну строку, а несколько - в количестве объединённых по вертикали ячеек.
Метод
выделяет нужную строку и ещё одну ненужную ячейку, при копировании которых Selection.Copy выдаёт ошибку "Данная команда неприменима для нескольких фрагментов.
Как быть?
[
Имеется таблица с объединёнными ячейками по вертикали. Требуется скопировать имеющуюся строку в эту таблицу.
Последовательность действий видится такой:
1. Выделить нужную строку, которая проходит через объединённые ячейки по вертикали.
2. Скопировать.
3. Вставить на одну строку выше.
4. Сбросить диапазон копирования.
Метод Select для 1-го пункта не подходит, поскольку выделяет не одну строку, а несколько - в количестве объединённых по вертикали ячеек.
Метод
Код |
---|
Application.Goto Reference:=ActiveCell.Address(ReferenceStyle:=xlR1C1) & "," & ActiveCell.EntireRow.Address(ReferenceStyle:=xlR1C1) |
Как быть?
[