Tạo File Excel đóng Tất Cả Các Workbook đang Mở Bằng VBA

• Trang chủ Có gì mới Hoạt động gần nhất Tác giả
• Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
• Video Video về Excel Video về tin học khác Tin tức về tin học chung
• Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
• Tài nguyên Đánh giá mới nhất Tìm tài nguyên
• Facebook
• Đóng góp

Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…

• Tìm bài viết mới
• Tìm theo chuyên mục

Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

• Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc

• Trang chủ
• Diễn đàn
• Lập Trình với Excel

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Tạo file excel đóng tất cả các workbook đang mở bằng VBA (1 người xem)

• Thread starter Thread starter ads_ads
• Ngày gửi Ngày gửi 8/2/13

Người dùng đang xem chủ đề này

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) A

ads_ads

Thành viên mới

Tham gia 15/1/13 Bài viết 21 Được thích 5 Em muốn tạo một file excel mà khi em mở nó ra thì tất cả các file excel đang mở khác tự động save và đóng lại, màn hình chỉ hiện mỗi file em mở thôi. Các anh giúp em tạo đoạn code VBA đó được không ạ? Em xin cảm ơn trước. Sắp xếp theo thời gian sắp xếp theo bầu chọn A

ads_ads

Thành viên mới

Tham gia 15/1/13 Bài viết 21 Được thích 5 Cuối cùng em cũng mò được trên mạng, em xin chia sẻ nếu ai thấy cần

Sub Autpen()'This sub will close all workbooks 'except the workbook in which the code is located. 'Thanks to http://support.microsoft.com/kb/147742 Dim WkbkName As Object On Error GoTo Close_Error Application.ScreenUpdating = False For Each WkbkName In Application.Workbooks() If WkbkName.Name <> ThisWorkbook.Name Then WkbkName.Close Next 'If everything runs all right, exit the sub. Exit Sub 'Error handler. Close_Error: MsgBox Str(Err) & " " & Error() Resume Next End Sub Nhấp chuột vào đây để mở rộng...

Upvote 0

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,981

ads_ads đã viết: Cuối cùng em cũng mò được trên mạng, em xin chia sẻ nếu ai thấy cần Nhấp chuột vào đây để mở rộng...

Dám cá với bạn code này không ăn thua. Nó sẽ chẳng đóng được những file excel mở trên các session khác nhau Ví dụ thay vì người ta double click vào biểu tượng file để mở file thì người ta lại làm khác: - Khởi động Excel (từ Start menu\Program) - Xong, bấm Open để mở 1 file Excel - Tiếp theo lại khởi động Excel lần nữa rồi lại bấm Open để mở file khác - Với 2 lần Open như vậy thì 2 file Excel trên sẽ được xem là nằm trên 2 session khác nhau - Bây giờ, nếu ta khởi động Excel, bấm Open để mở file đang chứa code thì chắc chắn rằng code của ta không biết có sự tồn tại của 2 file Excel đã mở trước đó ------------- Bạn thí nghiệm sẽ biết Upvote 0 A

ads_ads

Thành viên mới

Tham gia 15/1/13 Bài viết 21 Được thích 5

ndu96081631 đã viết: Dám cá với bạn code này không ăn thua. Nó sẽ chẳng đóng được những file excel mở trên các session khác nhau Ví dụ thay vì người ta double click vào biểu tượng file để mở file thì người ta lại làm khác: - Khởi động Excel (từ Start menu\Program) - Xong, bấm Open để mở 1 file Excel - Tiếp theo lại khởi động Excel lần nữa rồi lại bấm Open để mở file khác - Với 2 lần Open như vậy thì 2 file Excel trên sẽ được xem là nằm trên 2 session khác nhau - Bây giờ, nếu ta khởi động Excel, bấm Open để mở file đang chứa code thì chắc chắn rằng code của ta không biết có sự tồn tại của 2 file Excel đã mở trước đó ------------- Bạn thí nghiệm sẽ biết Nhấp chuột vào đây để mở rộng...

E đã test theo cách của anh và thấy đúng. Nhưng khổ nỗi cái file excel cùi của em nó cứ lỗi lung tung nếu có các file excel khác đang mở. Giờ em muốn khi file của em được mở lên thì các file excel đang mở khác được save và đóng lại, và không cho mở thêm bất kỳ file excel nào khác nữa cho đến khi file của em đóng lại (chẳng phải pro gì, chỉ đơn giản là em không muốn cái file của em mắc lỗi mà thôi ) ) Mò trên mạng mấy hôm rùi mà không thấy, mà tự viết code thì em chịu. Upvote 0

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,981

ads_ads đã viết: E đã test theo cách của anh và thấy đúng. Nhưng khổ nỗi cái file excel cùi của em nó cứ lỗi lung tung nếu có các file excel khác đang mở.. Nhấp chuột vào đây để mở rộng...

Vậy sao không trị tận gốc cho nó? File của bạn bị lỗi thì trị chính file ấy, mắc mớ gì file khác? Đưa file của lên xem thử nào! Upvote 0

MinhKhai

Giải pháp Ếc-xào

Tham gia 16/4/08 Bài viết 941 Được thích 574

ndu96081631 đã viết: Vậy sao không trị tận gốc cho nó? File của bạn bị lỗi thì trị chính file ấy, mắc mớ gì file khác? Đưa file của lên xem thử nào! Nhấp chuột vào đây để mở rộng...

Chào bác, xin phép được chen ngang 1 câu hỏi ngắn do chủ topic không thấy gửi file. Em xin code để: khi mở file A thì file B (D:\ABC\B.xls) cũng tự động mở theo và tự động đóng lại ngay mà không save. (Lý do là file A có dùng Vlookup để lấy dữ liệu trong file B, File B được thay đổi thường xuyên, nếu khi làm việc với file A mà ko mở file B lúc đó thì các hàm Vlookup không chịu cập nhật thông tin mới) Upvote 0

Quang_Hải

Thành viên gạo cội

Tham gia 21/2/09 Bài viết 6,077 Được thích 8,011 Nghề nghiệp Làm đủ thứ

MinhKhai đã viết: Chào bác, xin phép được chen ngang 1 câu hỏi ngắn do chủ topic không thấy gửi file. Em xin code để: khi mở file A thì file B (D:\ABC\B.xls) cũng tự động mở theo và tự động đóng lại ngay mà không save. (Lý do là file A có dùng Vlookup để lấy dữ liệu trong file B, File B được thay đổi thường xuyên, nếu khi làm việc với file A mà ko mở file B lúc đó thì các hàm Vlookup không chịu cập nhật thông tin mới) Nhấp chuột vào đây để mở rộng...

Đại khái thế này thì phải PHP: Sao chép. Sub mofile() Workbooks.Open duongdantenfile Workbooks("tenfile").Close False End Sub Upvote 0 Đ

Đoàn Ngoc Đức

Thành viên mới

Tham gia 29/11/19 Bài viết 7 Được thích 0

ndu96081631 đã viết: Dám cá với bạn code này không ăn thua. Nó sẽ chẳng đóng được những file excel mở trên các session khác nhau Ví dụ thay vì người ta double click vào biểu tượng file để mở file thì người ta lại làm khác: - Khởi động Excel (từ Start menu\Program) - Xong, bấm Open để mở 1 file Excel - Tiếp theo lại khởi động Excel lần nữa rồi lại bấm Open để mở file khác - Với 2 lần Open như vậy thì 2 file Excel trên sẽ được xem là nằm trên 2 session khác nhau - Bây giờ, nếu ta khởi động Excel, bấm Open để mở file đang chứa code thì chắc chắn rằng code của ta không biết có sự tồn tại của 2 file Excel đã mở trước đó ------------- Bạn thí nghiệm sẽ biết Nhấp chuột vào đây để mở rộng...

Em đang gặp trường hợp như thế. Có giải pháp nào để ta gộp hai session lại một không ạ Upvote 0

thnghiachau

Chỉ biết ngồi BÈ và PHÁN chuyện!!!

Tham gia 14/9/09 Bài viết 844 Được thích 710 Giới tính Nam Nghề nghiệp Search

ndu96081631 đã viết: Dám cá với bạn code này không ăn thua. Nó sẽ chẳng đóng được những file excel mở trên các session khác nhau Ví dụ thay vì người ta double click vào biểu tượng file để mở file thì người ta lại làm khác: - Khởi động Excel (từ Start menu\Program) - Xong, bấm Open để mở 1 file Excel - Tiếp theo lại khởi động Excel lần nữa rồi lại bấm Open để mở file khác - Với 2 lần Open như vậy thì 2 file Excel trên sẽ được xem là nằm trên 2 session khác nhau - Bây giờ, nếu ta khởi động Excel, bấm Open để mở file đang chứa code thì chắc chắn rằng code của ta không biết có sự tồn tại của 2 file Excel đã mở trước đó ------------- Bạn thí nghiệm sẽ biết Nhấp chuột vào đây để mở rộng...

Thầy @ndu96081631 ơi, em thử làm như thầy nói là mở file excel theo session khác nhau và em dùng code: Mã: Sao chép. Sub CloseAllFiles() Dim wb As Workbook For Each wb In Application.Workbooks If wb.Name <> ThisWorkbook.Name Then wb.Close SaveChanges:=True End If Next wb End Sub Và e kiểm tra thì thấy nó vẫn đóng hết toàn bộ file mở cùng hay khác session đó ạ... Cứ mỗi làm vào một Session mới là em open excel từ START, rùi em open file trong cửa sổ Excel vừa mở mới... Không biết em có sai gì không? Cám ơn thầy nhiều Upvote 0

befaint

|||||||||||||

Tham gia 6/1/11 Bài viết 14,600 Được thích 19,840

thnghiachau đã viết: START Nhấp chuột vào đây để mở rộng...

Upvote 0

thnghiachau

Chỉ biết ngồi BÈ và PHÁN chuyện!!!

Tham gia 14/9/09 Bài viết 844 Được thích 710 Giới tính Nam Nghề nghiệp Search

befaint đã viết: View attachment 241547 Nhấp chuột vào đây để mở rộng...

ah, thì ra là mở Excel theo kiểu này thì đúng là không thể close hết tất file khác session bằng code của mình dc. Cám ơn bác @befaint nha.... Upvote 0 Đ

Đoàn Ngoc Đức

Thành viên mới

Tham gia 29/11/19 Bài viết 7 Được thích 0

thnghiachau đã viết: ah, thì ra là mở Excel theo kiểu này thì đúng là không thể close hết tất file khác session bằng code của mình dc. Cám ơn bác @befaint nha.... Nhấp chuột vào đây để mở rộng...

Có cách nào để nó đóng tất cả các file khác session không bác Upvote 0

truongvu317

Thành viên tích cực

Tham gia 15/11/10 Bài viết 957 Được thích 699 Giới tính Nữ

thnghiachau đã viết: session bằng code của mình dc. Nhấp chuột vào đây để mở rộng...

nhiều sesion thì vào từng sesion mà đóng file hết lại chứ nhờ, Upvote 0 Đ

Đoàn Ngoc Đức

Thành viên mới

Tham gia 29/11/19 Bài viết 7 Được thích 0

truongvu317 đã viết: nhiều sesion thì vào từng sesion mà đóng file hết lại chứ nhờ, Nhấp chuột vào đây để mở rộng...

Không có cách nào dùng code để đóng à bá Upvote 0

lehungpharmacist

Thành viên mới

Tham gia 21/7/20 Bài viết 3 Được thích 0 Khó nhỉ. chắc phải viết phần mềm riêng chứ Upvote 0

truongvu317

Thành viên tích cực

Tham gia 15/11/10 Bài viết 957 Được thích 699 Giới tính Nữ

Đoàn Ngoc Đức đã viết: Không có cách nào dùng code để đóng à bá Nhấp chuột vào đây để mở rộng...

Dùng code để đóng, chứ ai đóng bằng tay. Upvote 0 Đ

Đoàn Ngoc Đức

Thành viên mới

Tham gia 29/11/19 Bài viết 7 Được thích 0

truongvu317 đã viết: Dùng code để đóng, chứ ai đóng bằng tay. Nhấp chuột vào đây để mở rộng...

Bác cho em xin code được không ạ Upvote 0

truongvu317

Thành viên tích cực

Tham gia 15/11/10 Bài viết 957 Được thích 699 Giới tính Nữ Hướng làm là như vậy, còn cụ thể ra sao thì hiện giờ mình chưa nghĩ ra. Upvote 0 Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

Bài viết mới nhất

Xin chỉ giúp sự khác nhau giữa giá trị trong ô A3 và A4 là gì

• huevantran
• Thứ hai lúc 16:55
• Giải thích, gỡ rối, xử lý lỗi công thức

Trả lời 7 Đọc 122 Hôm qua, lúc 12:19 dungpham01 D K Các nút Buttom, Combobox, Textbox bị thay đổi kích thước ...

• kaoehtkid
• 15/12/25
• Những vấn đề chung

Trả lời 15 Đọc 398 Hôm qua, lúc 11:36 ongke0711 L nhờ hoàn thiện file dò xổ số

• levovantoan
• Thứ sáu lúc 23:25
• Giải thích, gỡ rối, xử lý lỗi công thức

Trả lời 8 Đọc 336 Hôm qua, lúc 08:57 Gà Con yêu VBA Nếu diễn đàn GPE đóng cửa?

• • 
  • 

• PhanTuHuong
• 14/12/25
• Thư giãn

Trả lời 25 Đọc 952 Thứ hai lúc 19:20 huhumalu H

• Question Question

Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba

• • 
  • 
  • 

• ongke0711
• 6/10/24
• Lập Trình với Excel

4 5 6 Trả lời 582 Đọc 84K Thứ hai lúc 16:44 pycckuu410 T lấy hình ảnh từ sheet data sang sheet tra cứu

• trangntn92
• Thứ hai lúc 13:56
• Hàm và công thức Excel

Trả lời 1 Đọc 74 Thứ hai lúc 15:00 Maika8008 N Hướng dẫn công thức Query kết hợp Arrayfomula bị lỗi

• Na7979
• Thứ bảy lúc 11:40
• Lọc và sắp xếp dữ liệu

Trả lời 1 Đọc 106 Thứ hai lúc 10:22 trung1987 T Cùng xây dựng file Gia Phả

• • 

• huuthang_bd
• 30/12/13
• Xây dựng ứng dụng.

Trả lời 51 Đọc 21K Thứ hai lúc 05:37 Maika8008 [GPE21] ỨNG DỤNG POWER QUERY TRONG ĐỐI CHIẾU DỮ LIỆU HÓA ĐƠN ĐIỆN TỬ VÀ DỮ LIỆU KẾ TOÁN (1 người xem)

• • 

• GPE-Trợ Lý
• Chủ nhật lúc 10:02
• Học tập Online

Trả lời 0 Đọc 2K Chủ nhật lúc 10:02 GPE-Trợ Lý H hướng dẫn xóa dòng, cột file excel

• hoangvucntt
• Thứ bảy lúc 10:16
• Cấu trúc dữ liệu Excel và việc Xử lý dữ liệu

Trả lời 1 Đọc 107 Thứ bảy lúc 17:39 ptm0412 D Xin giúp.......Kết hợp countifs và Sumproduct để đếm dữ liệu và tính số lượng tổng không trùng lặp với nhiều điều kiện

• dieppk.nb92
• 14/12/25
• Hàm và công thức Excel

Trả lời 20 Đọc 621 Thứ bảy lúc 10:56 Phan Thế Hiệp Thuật ngữ "Đối chiếu Unicode" quan trọng trong việc xử lý chuỗi ký tự

• • 

• HeSanbi
• 13/12/25
• Xử lý chuỗi ký tự

Trả lời 2 Đọc 285 Thứ sáu lúc 17:38 HeSanbi Tính định mức sản phẩm

• • 

• Nguyenkhang2404
• 24/7/25
• Hàm và công thức Excel

Trả lời 11 Đọc 985 Thứ sáu lúc 14:27 nguyenanhtruong2409 N T Lọc dự liệu với hai điều kiện

• tiny1010
• 16/3/10
• Cấu trúc dữ liệu Excel và việc Xử lý dữ liệu

Trả lời 18 Đọc 7K Thứ sáu lúc 14:11 nguyenanhtruong2409 N N Tổng hợp 2 sheet khác nhau (có 1 cột dữ liệu trùng) trong goole sheet

• Na7979
• Thứ sáu lúc 14:01
• Google Sheets

Trả lời 0 Đọc 89 Thứ sáu lúc 14:01 Na7979 N D

• Question Question

Tách dòng tự động theo điều kiện bằng VBA

• • 

• duongnhuxuyen
• 12/12/25
• Lập Trình với Excel

Trả lời 17 Đọc 495 Thứ sáu lúc 12:04 ptm0412 P Lỗi hàm VBA phải add-in sau mỗi lần mở file

• phamdinh.huy.aladin@gmail
• 15/12/25
• Hàm và công thức Excel

Trả lời 7 Đọc 287 Thứ sáu lúc 08:11 minhnghia123 M M Sai lệch vùng dữ liệu khi tạo Name Range bằng VBA

• • 

• Mr_Siro
• 17/12/25
• Giải thích, gỡ rối, xử lý lỗi công thức

Trả lời 5 Đọc 213 Thứ năm lúc 13:23 Mr_Siro M P Tìm giá trị tồn kho đầu ngày

• ptthuongtn
• 17/12/25
• Hàm và công thức Excel

Trả lời 3 Đọc 216 Thứ năm lúc 11:22 Duy Tùng 9x Xin giúp đỡ về việc áp dụng hàm phù hợp để phân tách dữ liệu

• skygatevn
• 17/12/25
• Hướng dẫn sử dụng các hàm trong Excel

Trả lời 3 Đọc 173 17/12/25 skygatevn Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

• Maika8008 42
• thanthanhan 23
• ongke0711 22
• dungpham01 20
• ptm0412 18
• Phan Thế Hiệp 17
• eagle12 16
• nguyenanhtruong2409 16
• HUONGHCKT 12
• vic_it 11
• pycckuu410 11
• nhhnam 10
• dieppk.nb92 10
• Vũ Hải Sơn 9
• HeSanbi 9
• Gà Con yêu VBA 9
• le_vis 8
• bsbnhh 7
• duongnhuxuyen 7
• kaoehtkid 7

Thành viên có điểm tương tác cao nhất tháng

• Phan Thế Hiệp 87
• Maika8008 35
• thanthanhan 20
• ptm0412 20
• ongke0711 20
• HeSanbi 17
• dungpham01 11
• SA_DQ 9
• HUONGHCKT 9
• eagle12 9
• Cúc Hr 8
• dieppk.nb92 6
• pycckuu410 6
• Mr.hieudoanxd 5
• befaint 5
• Hoàng Tuấn 868 4
• Phuocam 4
• nguyenanhtruong2409 4
• Gà Con yêu VBA 3
• nhhnam 2

Thời gian đếm ngược.

000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025

• Trang chủ
• Diễn đàn
• Lập Trình với Excel

• Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…

Back Top Bottom