Cần viết Code hiện Msgbox là "File B.xls đang mở" (Màn hình đang ở File A.xls) (1 người xem)

[hung2412]

Xin chào các Anh chị và các bạn GPE!
Nhờ các Anh chị và các bạn giúp đỡ cho tôi vấn đề này với, cụ thể như sau:
Có 3 File A.xls, File B.xls và File C.xls đang mở. Màn hình máy tính đang ở File A.xls.
=> Có Code nào hiện Msgbox là "File B.xls đang mở" không?
Mong các Anh chị và các bạn GPE chỉ giáo!
Trân trọng cảm ơn!

 

[Kiều Mạnh]

Xin chào các Anh chị và các bạn GPE!
Nhờ các Anh chị và các bạn giúp đỡ cho tôi vấn đề này với, cụ thể như sau:
Có 3 File A.xls, File B.xls và File C.xls đang mở. Màn hình máy tính đang ở File A.xls.
=> Có Code nào hiện Msgbox là "File B.xls đang mở" không?
Mong các Anh chị và các bạn GPE chỉ giáo!
Trân trọng cảm ơn!

Mới sáng nay hỏi 1File ----> chiều3 File -------------> Ngày mai ta 5 File chăng....
Thì If cho nó Nếu File B.xls = True then Msgbox "OK",64,"Xong"

 

[Kiều Mạnh]

Hoặc Bạn có thể vào 2 Link sau tham khảo 2 Function nha....nói chung nhiều cách

Function IsFileOpen(filename As String)
https://support.microsoft.com/en-us/kb/213383

Link Sau Bài #4 nha

Function IsFileOpen(FileName As String) As Boolean

http://www.giaiphapexcel.com/forum/...ỏi-về-code-kiểm-tra-một-file-đang-mở-hay-đóng