在If语句中检查工作表是否存在的函数

Question

我有一个功能来检查工作表是否存在.我无法在if语句中使用它.

我宁愿不在if语句之前创建一个保存结果的变量.我应该将功能更改为子功能吗？

sub tester()
    If ShExist("Equity") = True then call differentfunction
end sub

Function ShExist(name As String)
    Dim WorksheetExists
    WorksheetExists = Evaluate("ISREF('" & (name) & "'!A1)")
End Function

Answer 1

您的功能不完整或正确.以下将有效:

Function ShExist(name As String)
    ShExist = Evaluate("ISREF('" & (name) & "'!A1)")
End Function