在EXCEL VBA 中如何在调用子程序时传递数组参数?我的数组是二维的,_百 ...

发布网友发布时间：2023-12-31 19:54

共1个回答

热心网友时间：2024-08-12 12:43

Sub test()
Dim arr(), H As Long, L As Long
arr = Range("A1:C8")
L = 2
H = 5
MsgBox "工作表的第" & H & "行,第" & L & "列的值是:" & arr(H, L), , Title:="主程序信息"
Call CD(arr, H, L)
End Sub
Sub CD(iarr, iH, iL)
ss = iarr(iH, iL)
MsgBox "工作表的第" & iH & "行,第" & iL & "列的值是:" & ss, Title:="子程序信息"
End Sub

声明：本网页内容为用户发布，旨在传播知识，不代表本网认同其观点，若有侵权等问题请及时与本网联系，我们将在第一时间删除处理。E-MAIL:11247931@qq.com