在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