在VBA中转置范围

Question

我正在尝试通过VBA宏在Excel中转置一系列单元格，但出现一些错误，主要是错误91。

我对VBA还是很陌生，对功能也不是很了解。

Range(InRng).Select

Set Range1 = Selection

Dim DestRange As Range

Set DestRange = Application.WorksheetFunction.Transpose(Range1)

经过几个论坛之后，这就是我的想法。需要注意的一件事是，我不必将它们复制到任何其他单元格中。

我要实现的目标是创建一个协方差方法，并且在选项窗口中，用户可以选择范围，然后按列或按行选择，这将影响所得的协方差矩阵。

Answer 1

这使您可以将X和X'作为变量数组传递给另一个函数。Dim X() As VariantDim XT() As VariantX = ActiveSheet.Range("InRng").Value2XT = Application.Transpose(X)要将转置值作为范围，您必须通过此工作表中的答案来传递它。如果不了解协方差函数的工作原理，很难看到所需的东西。