Транспонирование квадратной матрицы

[Djeki]

Подскажите пожалуста : В приложенном Excel квадратную матрицу можно транспонировать двумя вариантами. Какой из них правильный первый или второй ? Спасибо за ответ.

[R Dmitry]

Сообщение от Djeki

Подскажите пожалуста : В приложенном Excel квадратную матрицу можно транспонировать двумя вариантами. Какой из них правильный первый или второй ? Спасибо за ответ.

Sub yyy()
Dim a
a = [a1].CurrentRegion.Value
a = Application.Transpose(a)
[k10].Resize(8, 8) = a
End Sub

а этим проверьте