小编Mic*_*ael的帖子

我在引用VBA中的动态名称范围时遇到麻烦。
我的范围定义为

    =偏移（Sheet！$ B $ 2,0,0，COUNTA（Sheet！$ B：$ B）-1,1）

我的代码应在一个范围内搜索另一范围内的所有条目，目的是要添加所有缺少的条目。到目前为止，我有

    子UpdateSummary（）
    暗单元格范围
    Dim rngF作为范围
    设置rngF = Nothing

    '逐步遍历数据范围内的每个单元格
    对于工作表中的每个单元格（“方面”）。范围（“ A_Date”）
        '搜索当前单元格值的摘要范围
        设置rngF = Worksheets（“ Summary”）。Range（“ Sum_Date”）。Find（Cell.Value）//不起作用
        如果rngF什么都没有，那么
            '在摘要中添加日期
        万一
        设置rngF = Nothing
    下一个单元格
    结束子 

For循环似乎工作正常。但是，使用.Find方法会给我一条错误消息。

    应用程序定义或对象定义的错误

如果我将命名范围替换为特定范围（$ B $ 2：$ B $ 5000），它确实起作用，因此似乎取决于命名范围的传递方式。
任何想法，将不胜感激。

谢谢。