Open File bất kỳ với FullPath

[haingo08tlt]

Hi All!
Dùng cách nào để mở một file bất kỳ trong excel nhỉ? file bất kỳ ở đây là một full Path ta truyền vào (E:\a.mp3,E:\b.pdf,E:\c.dat,....)
Thank !

 

[ndu96081631]

Hi All!
Dùng cách nào để mở một file bất kỳ trong excel nhỉ? file bất kỳ ở đây là một full Path ta truyền vào (E:\a.mp3,E:\b.pdf,E:\c.dat,....)
Thank !

Thử vầy xem:

With CreateObject("Shell.Application")
   .Open ("Fulll Path")
End With

Ví dụ:

With CreateObject("Shell.Application")
   .Open ("D:\My Music\Jimmi Nguyen\Con day noi nho.mp3")
End With

Cái này tương đương với việc bạn double click vào file đấy!