小编use*_*094的帖子

如何返回工作表对象参考？我一直在浏览各种谷歌搜索结果.

例如,我有一个像这样的功能代码.wSheet已经暗淡了:

Public wSheet As Worksheet
...
Set wSheet = ActiveWorkbook.Worksheets("ExampleSheet")
wSheet.Range("A1").Value = "Hello"

但是,我希望wSheet现在调用一个模块来提供正确的引用.像这样的东西:

Public wSheet As Worksheet
...
Set wSheet = myModule.get_ExampleSheet
wSheet.Range("A1").Value = "Hello"

然后在模块myModule中有一个函数

Function get_ExampleSheet() As Worksheets
    get_ExampleSheet = ActiveWorkbook.Worksheets("ExampleSheet")
End Function

我尝试的一切都给了我各种运行时错误.反正有没有让这个工作？

谢谢,提前!