Giúp đỡ em về code VBA download file IE hàng loạt về thư mục chỉ định

[alex_1989]

Mọi người ơi. Em có viết 1 macro tự down load file hàng loạt như trên (tầm 10 file). Tự nhấn "export to excel" và save về thư mục mặc đinh IE là "Download". . Đoạn Code như sau:

Do While ie.Busy Or Not ie.readyState = IE_READYSTATE.complete: DoEvents: Loop
Sleep 1500
Application.SendKeys "%{S}"
Application.DoubleClick
End If
i = i + 1
vSO = Trim(Range("A" & i).Value)
Do While ie.Busy Or Not ie.readyState = IE_READYSTATE.complete: DoEvents: Loop
Sleep 300
Loop
==== với Application.SendKeys "%{S}" là tự save về thư mục mặc định là Download của IE.
Nhưng vấn đề đặt ra là mình mún down về thư mục mình chỉ dịnh trước ., ví dụ :C:\ LP View, có cách nào không mọi người ơi.

 

[toanqlcn]

Bạn thử thêm dòng thay đổi đường dẫn trước
If Dir("C:\ LP_View ", vbDirectory) <> vbNullString Then ChDir C:\ LP_View