Транспонировать строки в столбцах в MS XLS, используя VBA

Question

У меня есть XLS, для которого мне нужно A1: H1, чтобы сказать A1: A7. Я могу добиться этого с помощью функции транспонирования в копии. Однако мне нужно сделать это как часть скрипта VBA. Кажется, я не могу найти эквивалентную функцию.

Answer 1

То же самое, в основном.

Вы можете использовать копию:

source_range.Copy
dest_range.PasteSpecial Transpose:=true
application.cutcopymode = false

Или вы можете избежать его использования (если вам нужны только необработанные значения):

dest_range.value = application.worksheetfunction.transpose(source_range.value)