Question

我确实有一个大型数据集，其中包含多年的每小时数据：我想制作一个具有以下形式的4维数组：

要获得我必须找到最后观察到的数据的年数，然后将其与第一个数据进行比较，为此我需要使用的行数量。

Dim YearAmount As Integer

Const Lastrow As Long = Sheets(1).Cells(Sheets(1).Rows.Count,"A").End(xlUp).Row

'This returns an error, saying "Constant expression required"

YearAmount=Datediff("yyyy", Range("A2").Value , Range("A" & Lastrow ).Value) + 1

Dim Data(1 to YearAmount,1 to 12,1 to 31,0 to 23) as Double

我不知道如何正确地为我的数据数组设置arround，我应该将它初始化为变量数组然后使用ReDim方法吗？如果是这样，我将如何调整大小以适应更多维度？

尝试将LastRow和YearAmount声明为常量不起作用，因为vba大喊我正在尝试将函数返回值设置为常量，这我不知道如何绕过。

Answer 1

首先对阵列进行控制，然后将其重新调整为大小。

s = request.get(url)

昏暗的声明可以与其他声明一起使用。

通过变量声明多维数组大小

1 个答案: