Developing.ru

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

.Range(irange).PasteSpecial Paste:=xlPasteColumnWidths, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
.Range(irange).PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False

, где irange, понятно, переменная содержащая конкретное указание на адрес куда вставляю данные.

Нельзя ли это же сделать без Paste, то есть через ".copy destination:=" к примеру? В общем как-то избавиться от обращения к буферу и от Paste. Не то чтобы очень нужно, но раздражает что помимо доп. строк с этим пасте надо еще помнить, что буфер надо почистить.

И второй вопрос сразу: если копирование прописываешь как к примеру workbook1.sheet1.range1 = workbook2.sheet2.range2, то буфер после этих операций чистить не надо. Правильно понимаю?

&quot писал(а):Нельзя ли это же сделать без Paste, то есть через ".copy destination:=" к примеру?

Только если сделать .copy, а потом еще и ширину столбца присвоить следом. Т.е. в 2 команды.

Сорри, а поподробнее можно ? Я сейчас в исходном примере делаю .copy (оставил за рамками за очевидностью) и затем два paste: форматов и ширины столбцов. Затем чищу буфер. Итого четыре команды. Как это делается двумя командами? И .copy - это по-любому использование буфера. Правильно?

И во втором вопросе-примере буфер используется или нет? Надо ставить команду чистки буфера после применения такого кода?

Буфер при этом не используется.
--------------------------------------------------------------------------------
Добавлено сообщение
--------------------------------------------------------------------------------
Для нескольких столбцов это тоже пожходит!

Naeel Maqsudov, в общем случае при переносе по .copy строк 3 - так как нужно помимо ширины столбцов устанавливать ещё и высоту строк RowHeight.

Сорри, не разобрался: помимо переноса ширины еще добавлять нужно перенос высоты строки? Разве excel при отсутствии указаний не будет использовать здесь высоту по умолчанию?

Именно что что

будет использовать высоту по умолчанию

.
Т.е если в источнике была другая при простом копировании, скажем на другой лист, исходная высота строк пропадёт. Поэтому либо SpecialPaste, либо установка
ширины и высоты.