Question

我正在尝试从excel中的命名范围计算vba中的行数和列数。然后在2D阵列中使用行和列计数来执行其他计算。命名范围是＆＃34; CF_Inputs＆＃34;这是来自A2：Z60的工作表，名为＆＃34; Price_Volumes_Inputs＆＃34;。我似乎无法获得一个＆amp;列数使用命名范围，所以我使用下面的代码和偏移方法来计算行和列。有没有办法使用实际的命名范围来做到这一点？我对整个编程工作都很陌生，所以我为这个简单的问题道歉。

Dim Inputs As Variant    
Sheets("Price_Volumes_Input").Activate

Inputs = Range("A2", Range("Z2").End(xlDown).End(xlToRight))

Answer 1

欢迎来到VBA编程世界。如果您要进行Excel VBA编程，那么您需要为Chip Pearson的网站添加书签。我发现它非常有用。链接为http://www.cpearson.com/Excel/MainPage.aspx

有很多方法可以做到这一点。例如，一种简单的方法是

Dim dataRows As Long
Dim dataCols As Long
Dim workArray as Variant

With ActiveWorkbook.Sheets("Price_Volumes_Input").Range("CF_Inputs")
    dataRows = .Rows.Count
    dataCols = .Columns.Count
End With

Dim workArray() As Variant
Redim workArray(dataRows, dataCols) as Variant
Dim i as Long, j as Long
For i = 0 to dataRows - 1
    For j = 0 to dataCols - 1
        'do the calculations
    Next j
Next i

计算vba中命名范围的行和列

1 个答案: