Как назвать сопоставление XML в VBA в Excel

Question

Я использую VBA в Excel, чтобы сделать запрос API, а затем помещаю ответ в определенный лист в книге. Код, который я нашел, автоматически называет карту XML для меня. Я хотел бы решить, как его назвать, чтобы потом удалить.

Excels заканчивает тем, что называл это что-то вроде "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