Страницы: 1
RSS
Как вставить копированный диапазон в ячейку, указанную после запуска макроса
 
Всем привет!

Кто подскажет как праивльно записать макрос, который будет выполнять следующее действие:
1) До активации макроса копируется диапазон
2) Выделяется ячейка куда нужео вставить данные
3) При запуске макроса происходит вставка значений с транспонированем.

Попробовал посмотреть по шагам, но если это запускать, то вставляет строго в ячейку A3, а нужно, чтобы вставлял в ту, которая будет выделена перед запусом макроса.
Код
Sub Макрос()'
' Макрос1
'

'
   Selection.Copy
   Range("A3").Select
   Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
       :=False, Transpose:=True
End Sub
Заранее спасибо!
 
попробуйте так. Скопируйте что-то на листе, выделите нужную ячейку для вставки, а потом запустите этот макрос.
Код
Sub Макрос()
    'Selection.Copy 'копирует выделенные ячейки в буфер-обмена
    ActiveCell.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=True
End Sub
Изменено: New - 02.02.2022 03:22:50
 
Спасибо! Все сработало!
Страницы: 1
Наверх