Как сохранить исходное форматирование при копировании в Excel

← →
Dron1 (2004-04-26 14:40) [0]

Добрый день. Такой вопрос - как при копировании области в Wokksheet в другую позицию сохранить в новой позиции исходное форматирование области, т.е. границы, шрифт, заливку и т.д?

← →
Курдль © (2004-04-26 14:41) [1]

А каким образом Вы копируете? Через буфер обмена?

← →
evvcom © (2004-04-26 14:44) [2]

Открываем в Excel панель VB. Жмакаем запись макроса, делаем нужные действия, остановка записи и анализ полученного кода в VB.

← →
Dron1 (2004-04-26 15:19) [3]

Поначалу я попробовал поячеечное считывание в вариантный массив, а потом присвоение новой области в WorkSheet"e этого массива. Данные вставляются, а исходное форматирование - нет.
Сейчас попробовал записать макрос в Excel - и вот что он выдал.
Range("A4:AX22").Select Selection.Copy Range("A23").Select ActiveSheet.Paste
Вот основные команды - я убрал из примера всякие скроллы. Как мне перевести эти команды для Delphi?
Первую строку методом пробы я нашел :
Workbook_month.WorkSheets[1].Range["A4","AX22"].Select;
А вот с отальными проблема. Помогите!!!

← →
Dron1 (2004-04-26 15:21) [4]

Отбой. Всем спасибо. Методом пробы ответ нашел сам. Еще раз спасибо за ответ про макросы - я что-то недооценивал их.

Как сохранить исходное форматирование при копировании в Excel Найти похожие ветки