如何在Excel中的VBA中命名XML映射

Question

我在excel中使用VBA发出API请求，然后将响应放入工作簿中的特定表中。我找到的代码会自动为我命名XML映射。我想确定一种命名方式，以便以后删除。

Excel最终按照“ Envelope_Map”的名称对此进行命名。每次我运行代码时，都会添加一个数字，例如“ Envelope_Map1”，“ Envelope_Map2”等。

我宁愿不要尝试使用“ Envelope_Map”将其删除，因为我会将这段代码发送给其他人，并且我不想冒出错的风险，事实证明他们在与第一个映射不同。

这是我正在使用的代码行。

Sub xml_data(data)
    ActiveWorkbook.XmlImportXml data, ImportMap:= _
    Nothing, Overwrite:=True, 
    Destination:=Range("$A$1")
End Sub

这就是我打算删除它的方式。

On Error Resume Next:
    ActiveWorkbook.XmlMaps("Envelope_Map").Delete