刘世达

摘要： Sub test() Dim html As Object, D As Object, W As Object, arr() Set html = CreateObject("msxml2.xmlhttp") html.Open "GET", "file:///" & ThisWorkbook.Pa 阅读全文