Как переписать код Excel на Delphi
Добавлено: 14 янв 2005, 16:58
Подскажите кто сможет пожалуйста. Мне нужно скопировать несколько рядов и вставить их как новые. В Excel есть функция "добавить скопированные ячейки" и макрос выглядит так
знаю как просто добавить ряды и как копировать ряды:Rows("3:5").Select
Selection.Copy
Rows("2:2").Select
Selection.Insert Shift:=xlDown
казалось бы все работает, но если копируемые ряды сгруппированы, то группировка не копируется, а хотелось бы.var Worksheet: _Worksheet;
begin
// вставляю новые ряды
Worksheet.Rows.Range['3:5',EmptyParam].Insert(xlDown);
// копирую ряды
Worksheet.Range['A3','A5'].Rows.Copy(Worksheet.Range['A2',EmptyParam]);
end;