函数名称错误

Question

尝试使用以下功能时出错。奇怪的是，错误发生在名称

中

代码：

Function DATECHECK(rng As Range, date_time As Date) As Boolean

    For Row = 1 To rng.Rows.Count

    'Stuff'
    Next Row

 End Function

语法：

DateCheck(Sheet2!A2:B561, Sheet1!A2)

错误：

#NAME
#NAME(Sheet2!A2:B561, Sheet1!A2)

Answer 1

1. 确保该功能在公共模块中;不是私人工作表代码表。
2. DateCheck应该返回一些东西。在结束功能之前添加DateCheck = 1。
3. 您无法使用工作表UDF操纵其他单元格的值。你决定显示相关代码并不重要;这很重要。
4. 在函数的上下文中，Row是一个变量。如果您使用dim row as long，则需要将其声明为长（例如Option Explicit）。