Mở File B xuất hiện thông báo Chưa mở File A và đóng File B (1 người xem)

[tanthanh94]

Chào Các Anh
Em có dữ liệu File B lấy link dữ liệu của File A.
File B update dữ liệu của File A, nếu không mở File A thì không update dữ liệu được.
Em muốn khi mở File B xuất hiện thông Báo " Bạn chưa mở File A" và đóng File B

 

[Quang_Hải]

Chào Các Anh
Em có dữ liệu File B lấy link dữ liệu của File A.
File B update dữ liệu của File A, nếu không mở File A thì không update dữ liệu được.
Em muốn khi mở File B xuất hiện thông Báo " Bạn chưa mở File A" và đóng File B

Private Sub Workbook_Open()
Dim wb As Workbook
For Each wb In Workbooks
   If wb.Name = "A.xls" Then End
Next
MsgBox "File A chua mo"
ThisWorkbook.Close False
End Sub

 

[giola]

Chào Các Anh
Em có dữ liệu File B lấy link dữ liệu của File A.
File B update dữ liệu của File A, nếu không mở File A thì không update dữ liệu được.
Em muốn khi mở File B xuất hiện thông Báo " Bạn chưa mở File A" và đóng File B

xem code bài #8 ở đây, để tham khảo và sửa lại hợp lý, không cần vòng lặp
http://www.giaiphapexcel.com/forum/...ự-động-mở-2-file-cùng-lúc&p=634075#post634075