execl 可变参数linux,如何分析动态数组参数在Excel VBA中的可变

我想通过动态阵列(参数)的延续，下面我正在试图，但它不能正常工作。你可以帮我吗。

Dim StartrowArr, Startrow1Arr, J As Integer

Dim flRow, dtRow As String

Set filRng = Worksheets("Sheet1").Range("C1:C50")

Set dtlRng = Worksheets("Sheet1").Range("F1:F50")

For Each cell In filRng

If cell.Value <> "" Then

ftRow = ftRow & cell.Row & ","

End If

Next cell

ftRow = Left(ftRow, Len(ftRow) - 1)

Debug.Print ftRowNo

For Each cell In dtlRng

If cell.Value <> "" Then

dtRow = dtRow & cell.Row & ","

End If

Next cell

dtRow = Left(dtRow, Len(dtRow) - 1)

Debug.Print dtRow

StartrowArr = Array(filRowNo) ※ dynamic array args

Startrow1Arr = Array(dtlRowNo)

但初始化阵列(参数)等上面之后，它返回错误1004 [Startrow1在初始化与0]。我也尝试过CInt(ftRow)来从字符串类型转换为Integer。没有改变。

此外，日志显示Startrow，Startrow1的值如下。

Startrow: 2, 4, 7

Startrow1: 2611 ※ should be 2, 6, 11

但是，如果我静态初始化StartrowArr = Array(2,4,7)。它工作完美。

如何正确地将参数传递给StartrowArr和Startrow1Arr。

2017-08-04

DIO

+0

什么是你传递给Array()的mapRowNo和tcRowNo？ –