传递表函数（excel vba）

我一直在试图将我的工作簿中的工作表传递给一个函数，但似乎没有工作。 function是

Private Sub passToSheet(theData As Variant, Optional mySheet As Worksheet) 

我曾经尝试过

 Dim mySheet as Worksheet Set mySheet = "Results" 

然后调用该函数

 passToSheet theData mySheet 

但似乎并不奏效。 我真的不知道该怎样才能以正确的方式引用工作表！ 任何帮助深表感谢！

Answer 1

使用

 'Set mySheet to worksheet Set mySheet = Worksheets("Results") 

获取对工作表的引用。