用VBA获取Excel中命名区域的最后一项

mrwjdhj3 于 2023-01-27 发布在其他

关注(0)|答案(1)|浏览(118)

通过vba复制模板工作表后，我需要为开始和结束日期设置两个单元格，它们使用引用工作表范围命名范围的数据验证来验证其公式。为此，我需要命名范围的第一个和最后一个条目。
要在设置单元格数据之前测试代码，我有以下代码：
Debug.Print "Charts 1 Start " & Sh.Names("ProjectTemplateDates").RefersToRange(1, 1)
Debug.Print "Charts 1 End " & Sh.Names("ProjectTemplateDates").RefersToRange.End(xlDown).Value
第一个Debug.Print提供了正确的第一项：
Charts 1 Start 01/09/2017
但是最后一个密码给了我：
Charts 1 End 100000
当我期望它给予我Charts 1 End 01/03/2023时。我应该做一些不同的事情来查找命名范围中的最后一个条目吗？

excel

来源：https://stackoverflow.com/questions/75209877/getting-the-last-entry-in-a-named-range-in-excel-with-vba

1条答案

按热度按时间

ctehm74n1#

With sh.Names("ProjectTemplateDates").RefersToRange
    Debug.Print "Charts 1 Start " & .Cells(1, 1)
    
    Debug.Print "Charts 1 End " & .Cells(.Rows.Count + 1, 1).End(xlUp).Value
End With

赞(0）回复(0）举报 2023-01-27

我来回答

用VBA获取Excel中命名区域的最后一项

1条答案

相关问题

热门标签

最新问答