Excel VBA - Range.Copy транспонированная паста

Я пытаюсь сделать что-то очень простое, но, похоже, я застрял. Я следую меню помощи для PasteSpecial, но я не могу заставить свой код работать без ошибок.

Я хочу взять Worksheets("Sheet1").Range("A1","A5") и вставить транспонирование в Worksheets("Sheet2").Range("A1","E1").

Какой самый простой способ выполнить это?

Ответ 1

Worksheets("Sheet1").Range("A1:A5").Copy
Worksheets("Sheet2").Range("A1").PasteSpecial Transpose:=True