code VBA save và close một file

[nam2806]

Tôi có 2 file XLS đang mở, (A.XLS VÀ B.XLS), nhờ ACE trợ giúp đoạn code: từ A, ghi lại B và thoát B.

 

[Hai Lúa Miền Tây]

Tôi có 2 file XLS đang mở, (A.XLS VÀ B.XLS), nhờ ACE trợ giúp đoạn code: từ A, ghi lại B và thoát B.

Thử code sau nhé

Application.EnableEvents=False
workbooks("B").close savechanges:=true
Application.EnableEvents=True

 

[nam2806]

Sao nó báo lỗi Run-time error '9' bạn dom nhỉ? Bạn xem lại giúp!

 

[ndu96081631]

Sao nó báo lỗi Run-time error '9' bạn dom nhỉ? Bạn xem lại giúp!

Thử sửa lại thành Workbooks("B.xls").Close True xem

 

[nam2806]

Vẫn chưa được bạn ơi. Nhân tiện xin hỏi trong VBA có sự kiện BeforeClose, vậy có sự kiện AfterClose không nhỉ?

 

[Hai Lúa Miền Tây]

Vẫn chưa được bạn ơi. Nhân tiện xin hỏi trong VBA có sự kiện BeforeClose, vậy có sự kiện AfterClose không nhỉ?

Có thể file bạn đang mở là 1 cửa sổ Excel khác, bạn thử mở File A xong từ file A đó mở file B bằng cách Open trên thanh công cụ, làm việc trên file B, trở lại file A chạy code thử nhé.