引用带JET驱动程序表的Excel表单与下划线重复

我使用JET数据库驱动引用了一个excel文档,这个工作很好,直到有一天应用程序失败。 经过进一步的调查,我注意到这些标签在一些情况下(实际上是所有标签)都是重复的 – 即Tab1 $和Tab1 $ _。 我研究过这个问题,发现它是由用户使用filter造成的。 现在filter已被删除,没有特殊的格式,冻结窗格或打印格式,但我仍然有这些选项卡重复。 通常情况下,我会解决这个问题,但由于我们在代码冻结,我需要提出一个基于Excel的解决scheme。 我想摆脱那些疯狂的下划线标签名称/崇敬。 我可能会运行一个程序清理文件,如果有必要,将其发回给用户,但我想先探索Excel选项。 思考? 我有Excel 2010,也可以访问任何其他版本。

下划线“表”是一个命名的范围。 你可以运行VBA吗? 如果是这样:

Dim defName As Name ''Either With ThisWorkbook ''Entire workbook For Each defName In .Names MsgBox defName.Name defName.Delete Next End With ''Or With Sheets("Sheet1") ''Scoped to sheet only For Each defName In .Names MsgBox defName.Name defName.Delete Next End With