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

O Xin mọi người giúp e xử lý file Xuất nhập tồn (từ dọc -> ngang) ạ!

• oiquetoi
• Hôm qua, lúc 22:22
• Hàm và công thức Excel

Trả lời 1 Đọc 22 Hôm nay lúc 00:33 DeTong D CHỌN VÀ SỬ DỤNG MÁY LỌC KHÔNG KHÍ

• • 
  • 

• PhanTuHuong
• 4/10/22
• Thư giãn

Trả lời 9 Đọc 2K Hôm qua, lúc 22:48 PhanTuHuong O Xin các bác giúp e file Xuất-nhập-tồn ạ. (chuyển dữ liệu dạng dọc -> ngang)

• oiquetoi
• Hôm qua, lúc 22:18
• Pivot table

Trả lời 0 Đọc 13 Hôm qua, lúc 22:18 oiquetoi O Copilot bình luận các ván cờ vua từng ngày.

• • 

• SA_DQ
• 3/11/25
• Chia sẻ

Trả lời 25 Đọc 1K Hôm qua, lúc 21:07 SA_DQ H

• Question Question

Lấy thông tin doanh nghiệp trên trang ĐKKD tự động bằng Code VBA

• hoahuongduong1986
• 15/5/20
• Lập Trình với Excel

Trả lời 18 Đọc 4K Hôm qua, lúc 15:14 phamduyhoang2907 P M Cách tính ngày chay Âm lịch đạo Cao Đài

• • 

• MNCK452
• Hôm qua, lúc 14:05
• Những vấn đề chung

Trả lời 0 Đọc 42 Hôm qua, lúc 14:05 MNCK452 M K Hàm tìm theo kết quả gần đúng nhất

• • 

• kiemkhach2
• Thứ hai lúc 21:14
• Hàm và công thức Excel

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

• Na7979
• 19/12/25
• Google Sheets

Trả lời 1 Đọc 213 Thứ ba lúc 09:51 yeudoi

• Question Question

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

• • 
  • 
  • 

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

4 5 6 Trả lời 585 Đọc 85K Thứ hai lúc 17:12 maphuong M S TỰ ĐỘNG CẬP NHẬT DỮ LIỆU

• sangdennh
• Thứ sáu lúc 09:55
• Hàm và công thức Excel

Trả lời 14 Đọc 555 Thứ hai lúc 07:51 le_vis L V Giúp tạo bảng phân công lịch trực tự động (1 người xem)

• • 

• vudaicacvatn
• 31/12/25
• Những vấn đề chung

Trả lời 5 Đọc 293 Thứ hai lúc 07:41 vudaicacvatn V T Mọi người giúp mình lập bảng tính sao hạn ạ (1 người xem)

• thinhthien1
• Chủ nhật lúc 22:23
• Tìm kiếm, dò tìm và tham chiếu

Trả lời 1 Đọc 154 Thứ hai lúc 06:15 Phan Thế Hiệp hỏi về công thức tách kí tự từ chuỗi

• Momominh
• Thứ bảy lúc 11:52
• Hàm và công thức Excel

Trả lời 9 Đọc 252 Thứ hai lúc 03:24 DeTong D File.xlsx hay bị tự động out, khi mở lại báo lỗi repaired và chỉ lưu được đến lần last saved gần nhất ạ

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

Trả lời 3 Đọc 114 Chủ nhật lúc 12:38 huhumalu H T Nhờ làm file excel quản lý kho N-X-T theo vị trí

• • 

• Tuan_Leok
• 1/11/18
• Excel Ứng Dụng

Trả lời 15 Đọc 6K Thứ bảy lúc 18:11 thanhphongtslocphat

• Question Question

Liệt kê tổ hợp chập k của nhóm n phần tử.

• • 
  • 

• NguyenNgocThuHien
• 5/12/17
• Lập Trình với Excel

Trả lời 55 Đọc 19K Thứ sáu lúc 14:14 tohop T G Em xin hỏi hàm Vlook up ạ!

• giangong
• Thứ sáu lúc 10:23
• Hàm và công thức Excel

Trả lời 1 Đọc 104 Thứ sáu lúc 10:38 dungpham01 D Chương trình lập Báo cáo khảo sát Địa chất công trình GeoSection

• • 

• PhanTuHuong
• 7/10/21
• Xây dựng ứng dụng.

Trả lời 10 Đọc 7K 1/1/26 PhanTuHuong 2 Xin hỏi về Công thức tính tiết theo PPCT (phân phối chương trình) trong Lịch báo giảng tự động

• 2013myvietnam
• 31/12/25
• Excel và Giáo Dục

Trả lời 9 Đọc 338 1/1/26 2013myvietnam 2 [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

• • 

• GPE-Trợ Lý
• 21/12/25
• Học tập Online

Trả lời 1 Đọc 10K 1/1/26 GPE-Trợ Lý 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

• sangdennh 7
• Phan Thế Hiệp 6
• DeTong 6
• dungpham01 5
• 2013myvietnam 4
• Duy Tùng 9x 3
• kiemkhach2 3
• SA_DQ 3
• HUONGHCKT 2
• thanhphongtslocphat 2
• zonmaomao 2
• huhumalu 2
• oiquetoi 2
• huuthang_bd 1
• giangong 1
• tohop 1
• Momominh 1
• thinhthien1 1
• vudaicacvatn 1
• PhanTuHuong 1

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

• Phan Thế Hiệp 17
• 2013myvietnam 5
• HUONGHCKT 4
• LOGANWover 3
• dungpham01 3
• DeTong 3
• thanthanhan 2
• huhumalu 2
• SA_DQ 2
• PhanTuHuong 2
• Duy Tùng 9x 1

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