excel - 如何将变量传递给函数？

Question

我有一个名为 sortRows(location As String, wksht As String)

参数 wksheet 从另一个循环电子表格的子例程传递给 sortRows。

我不断收到错误“编译错误。”预期：=“

经过一番研究，我发现了 ByRef 指令（？）并将 Sub 重新编写为 sortRows(location As String, ByRef wksht As String)

但是在工作表循环中调用它时我仍然会遇到同样的错误。

Sub 工作正常，但我似乎无法正常调用它。

我尝试了两种调用 Sub 的方法： sortRows ("Florida",sheetname) sortRows ("Florida", wksht:=sheetname)

两种方式都会导致“编译错误”

Answer 1

没有看到你的完整代码有点难。

但我建议您尝试将工作表变量作为工作表传递，即

Pearson Passing Simple Variables ByRef And ByVal有一个很好的参考资料

Sub test()
Dim ws As Worksheet
Set ws = Sheets(2)
Call sortRows("MyName", ws)
End Sub

Sub sortRows(location As String, ByRef ws1 As Worksheet)
MsgBox ws1.Name
End Sub