有關VBA抓取網址CSV問題

gto1208

請教各位高手，因證交所的網址有更改

myURL  = http://www.tse.com.tw/ch/trading/exchange/TWT93U/TWT93U.php?download=&qdate=105%2F04%2F06

使用VBA巨集時，只會抓到目前最新的資料，無法指定日期，想請問各位高手，是否上述網址有誤照成的? 謝謝

With ActiveSheet.QueryTables.Add(Connection:=myURL _
       , Destination:=Range("A1"))        
       .WebFormatting = xlWebFormattingNone
       .WebTables = "1"                    
       .AdjustColumnWidth = False           
       .Refresh 0
End With