Mở một tệp có tên chứa một không gian

Question

Tôi có một số mã Excel VBA đơn giản mở file không Excel như:

Sub scriptTest() 
    Set objshell = CreateObject("Wscript.Shell") 
    objshell.Run ("C:\TestFolder\Book1.pdf") 
    Set objshell = Nothing 
End Sub 

Chạy sẽ mở file trong Acrobat Reader. Tuy nhiên nếu tôi cố gắng để mở một tập tin có tên chứa một không gian nhân vật như:

Sub scriptTest() 
    Set objshell = CreateObject("Wscript.Shell") 
    objshell.Run ("C:\TestFolder\Bo ok1.pdf") 
    Set objshell = Nothing 
End Sub 

tôi nhận được:

Cả hai file tốt mở nếu tôi sử dụng lệnh Run từ Windows Menu bắt đầu. Làm thế nào tôi có thể khắc phục vấn đề này ??

Answer 1

Khi thực hiện báo cáo kết quả objshell.Run ("C:\TestFolder\Bo ok1.pdf"), bạn đang yêu cầu shell để thực hiện lệnh

C:\TestFolder\Bo ok1.pdf 

này được giải thích như là một yêu cầu để thực hiện chương trình C:\TestFolder\Bo.exe với một tham số của ok1.pdf.

Bạn thực sự muốn shell để thực hiện lệnh

"C:\TestFolder\Bo ok1.pdf" 

nơi có dấu ngoặc kép được sử dụng bởi các thông dịch lệnh để "nhóm" các bộ phận của lệnh với nhau.

Để có được lệnh đó, bạn cần phải thực hiện báo cáo kết quả

objshell.Run """C:\TestFolder\Bo ok1.pdf"""