Excel XMLMaps导入更改的文件名

Question

我将XML文件的一部分映射到Excel工作表。有没有一种方法可以增强下面的简单XMLMaps.Import VBA代码，以便：

• 第一个可用的XML将从指定的文件夹中打开 （例如，文件名不必完全匹配，例如不完全相同exp_20190519.xml，而只需*.xml

每天都会有一个新文件，其中包含日期名称，出于存档的原因，我希望保留原始名称，而不总是使用固定名称。

或作为次要选择：

• Open file对话框将打开，允许用户手动选择合适的XML加载到映射区域中。 理想，带有打开的文件夹 在预先指定的文件夹中打开

对不起，我知道这不是问两个问题的好方法，但是会在两种情况下都可以使用。

Sub Import()  
ActiveWorkbook.XMlMaps("posreport_Map").Import Url:="C:\XML\exp_20190519.xml"
End Sub