转换Yahoo Finance货币XML以便使用XSLT导入Access

我正在尝试创建一个XSLT文件，我可以使用它正确地导入Yahoo all currency提要。 我希望最终将其构建到VBA中以自动导入

xml文件如下所示（但有更多货币）：

资源列表
美元/韩元
1174.170044
KRW=X
1484857724
通货
2017-01-19T20:28:44+0000
0
银1盎司999纽约
0.053778
XAG=X
1484857681
通货
2017-01-19T20:28:01+0000
36

---

我曾尝试创建一个XSLT文件，但我认为这是完全错误的。我看了一些不同的例子，但我不知道如何为提供的文件进行定制。我相信很多用户都会对使用这个文件感兴趣，而且它可以为许多不同的人重新设计。

不知羞耻地从Parfait的优秀答案中剽窃，我提出了XSLT文件

这将把源XML文件转换为

美元/韩元
1174.170044
KRW=X
1484857724
通货
2017-01-19T20:28:44+0000
0
银1盎司999纽约
0.053778
XAG=X
1484857681
通货
2017-01-19T20:28:01+0000
36

---

哪个访问可以导入到名为[resource]的表中。

不知羞耻地窃取了Parfait的优秀答案，我提出了XSLT文件

这将把源XML文件转换为

美元/韩元
1174.170044
KRW=X
1484857724
通货
2017-01-19T20:28:44+0000
0
银1盎司999纽约
0.053778
XAG=X
1484857681
通货
2017-01-19T20:28:01+0000
36

---

哪个访问可以导入到名为[resource]的表中。

打开宏记录器，进入“数据>来自Web>导入您在上面发布的链接”。我就是这么做的，得到了下面的代码

Sub Macro1()

    ActiveWorkbook.XmlImport URL:= _
        "http://finance.yahoo.com/webservice/v1/symbols/allcurrencies/quote?format", _
        ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$1")
End Sub

这是最终结果

---

打开宏记录器，进入“数据>来自Web>导入您在上面发布的链接”。我就是这么做的，得到了下面的代码

Sub Macro1()

    ActiveWorkbook.XmlImport URL:= _
        "http://finance.yahoo.com/webservice/v1/symbols/allcurrencies/quote?format", _
        ImportMap:=Nothing, Overwrite:=True, Destination:=Range("$A$1")
End Sub

这是最终结果

---

我想目前还不清楚你在问什么。首先，应该包括XSLT文件。在此之后，您看过哪些示例（如果相关）？XSLT转换的预期输出是什么？（一个.csv文件？另一种XML格式？…）我想目前还不清楚你在问什么。首先，应该包括XSLT文件。在此之后，您看过哪些示例（如果相关）？XSLT转换的预期输出是什么？（一个.csv文件？一个不同的XML格式？…）哈哈…这里没有羞耻！我们应该注意，Access的导入方法是以元素为中心的，而不是以属性为中心的，正如这个XML在列名中所显示的那样。非常感谢，它工作得非常好——感谢Gord和ThompsonHaha……这里没有什么遗憾！我们应该注意，Access的导入方法是以元素为中心的，而不是以属性为中心的，正如XML中的列名所示