Làm việc với nhiều Sheet trên một file Excel giúp chúng ta tăng cường sự tương tác và liên kết giữa các bảng tính cần tính toán. Tuy nhiên, nó cũng gây trở ngại không nhỏ nếu file Excel của bạn quá lớn, và có quá nhiều Sheet.
Và nếu bạn đang có nhu cầu tách các Sheet này ra thành từng file Excel riêng biệt để tăng tốc độ mở file, giảm bớt dung lượng của file khi phải kéo theo các Add ins, hay VBA đã lưu thì đây chính là bài viết dành cho bạn.
Bởi vì trong bài viết này mình sẽ chia sẻ với các bạn một mẹo nhỏ trong việc tách hàng loạt Sheet trên một file Excel, và lưu lại dưới định dạng tên Sheet bằng code Macro VBA Excel.
Sau khi tách xong sẽ lấy tên của các Sheet thành tên file, và các công thức có trong Sheet sẽ vẫn được giữ nguyên mà không bị thay đổi.
Đọc thêm:
- Cách sửa lỗi công cụ VBA bị ẩn trên Excel và Word
- Thủ thuật lưu file Excel có chứa code Macros VBA Excel
- Hàm đổi chữ thường thành chữ in hoa trong Excel, và ngược lại
Dưới đây là ví dụ của file Excel, với file Bảng điểm gồm 6 Sheet khác nhau.
Cách tách hàng loạt Sheet thành các file Excel bằng code VBA
+ Bước 1: Để tách hàng loạt Sheet mà vẫn giữ nguyên các công thức, cùng các hàm Add ins, hay mã VBA [nếu có]. Bạn click mở tab Developer [xem
cách hiện tab Developer trên Excel] => và chọn Visual Basic như hình bên dưới.
Hoặc nhấn tổ hợp phím Alt + F11 để mở trình VBA trên Excel ra.
+ Bước 2: Tại hộp thoại Microsoft Visua Basic for Applications, bạn click mở menu Insert => rồi chọn Module.
+ Bước 3: Và bạn hãy copy đoạn mã Code sau:
Sub tachsheet[]
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim sh As Worksheet
For Each sh In Worksheets
sh.Copy
ActiveWorkbook.SaveAs ThisWorkbook.Path & “\” & sh.Name, 51
ActiveWorkbook.Close
Next
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub
Hoặc code sau:
Sub Splitbook[]
‘Updateby20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
xWs.Copy
Application.ActiveWorkbook.SaveAs Filename:=xPath & “\” & xWs.Name & “.xls”
Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
+ Bước 4: Paste vào hộp thoại Module [Code] => sau đó nhấn Run, hoặc nhấn phím F5 trên bàn phím để thực hiện tách các Sheet thành các file Excel riêng biệt.
Và đây là kết quả của thư mục sau khi tách Sheet thành các file Excel định dạng *.xlsx.
Lời kết
Okay, như vậy là mình vừa hướng dẫn cho các bạn cách tách Sheet thành từng file Excel riêng biệt bằng code VBA rồi nhé.
Rất nhanh chóng và đơn giản phải không các bạn 😀 Chúc các bạn thành công nha !
CTV: Lương Trung – Blogchiasekienthuc.com
Bài viết đạt: 4.5/5 sao - [Có 2 lượt đánh giá]
Note: Bài viết này hữu ích với bạn chứ? Đừng quên đánh giá bài viết, like và chia sẻ cho bạn bè và người thân của bạn nhé !
Bài viết [Tuts] Cách tách Sheet thành từng file Excel riêng biệt trong Excel thuộc chủ đề về tin học đang được rất nhiều bạn lưu tâm đúng không nào !! Hôm nay, Hãy cùng HocVienCanboxd tìm hiểu [Tuts] Cách tách Sheet thành từng file Excel riêng biệt trong Excel trong bài viết hôm nay nha !
Các bạn đang xem bài : “[Tuts] Cách tách Sheet thành từng file Excel riêng biệt trong Excel”
Làm việc với nhiều Sheet trên một file Excel giúp chúng ta tăng cường sự tương tác và kết nối giữa các bảng tính cần tính toán. mặc khác, nó cũng gây ra trở ngại không nhỏ nếu file Excel của bạn quá lớn, và có quá nhiều Sheet.
Và nếu bạn đang có mong muốn tách các Sheet này ra thành từng file Excel riêng biệt để đẩy nhanh mở file, giảm đi dung lượng của file khi phải kéo theo các Add ins, hay VBA đã lưu thì đây chính là bài viết dành cho bạn. Bởi vì trong bài viết này mình sẽ chia sẻ với các bạn một mẹo nhỏ trong việc tách hàng loạt Sheet trên một file Excel, và lưu lại dưới định dạng tên Sheet bằng code Macro VBA Excel.
Sau khi tách xong sẽ lấy tên của các Sheet thành tên file, và các công thức xuất hiện trong Sheet sẽ vẫn được giữ nguyên mà không bị thay đổi ngay.
Đọc thêm: Cách thu gọn bảng tính Excel với thanh cuộn SCROLL BAR
Dưới đây là ví dụ của file Excel, với file Bảng điểm gồm 6 Sheet khác nhau.
Xem ngay: Cách thực hiện các phép tính Cộng, Trừ, Nhân, Chia trên Excel
Cách tách hàng loạt Sheet thành các file Excel bằng code VBA
+ Bước 1: Để tách hàng loạt Sheet mà vẫn giữ nguyên các công thức, cùng các hàm Add ins, hay
mã VBA [nếu có]. Bạn click mở tab Developer [xem cách hiện tab Developer trên Excel] => và chọn Visual Basic như hình bên dưới.
Hoặc nhấn tổ hợp phím Alt + F11 để mở trình VBA trên Excel ra.
+ Bước 2: Tại hộp thoại Microsoft Visua Basic for Applications, bạn click mở menu Insert => rồi chọn Module.
Sub tachsheet[]
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Dim sh As Worksheet
For Each sh In Worksheets
sh.Copy
ActiveWorkbook.SaveAs ThisWorkbook.Path & “” & sh.Name, 51
ActiveWorkbook.Close
Next
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End SubXem thêm: Hướng dẫn gộp nhiều ô thành 1 ô trong Excel không bị mất dữ liệu
Hoặc code sau:
Sub Splitbook[]
‘Updateby20140612
Dim xPath As String
xPath = Application.ActiveWorkbook.Path
Application.ScreenUpdating = False
Application.DisplayAlerts = False
For Each xWs In ThisWorkbook.Sheets
xWs.Copy
Application.ActiveWorkbook.SaveAs Filename:=xPath & “” & xWs.Name & “.xls”
Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub
CÓ THỂ BẠN QUAN TÂM:
- Cách tạo các dòng chấm trong Excel [hoặc dòng kẻ ngang]
- Hàm tính tổng bình phương trong Excel và cách dùng
- Workbook và cách dùng trên Excel 2007
+
Bước 4: Paste vào hộp thoại Module [Code] => sau đó nhấn Run, hoặc nhấn phím F5 trên bàn phím để thực hiện tách các Sheet thành các file Excel riêng biệt.
Và đây là kết quả của thư mục sau khi tách Sheet thành các file Excel định dạng *.xlsx.
VIDEO về Cách tách Sheet thành từng file Excel riêng biệt trong Excel
Lời kết
Okay, như vậy là mình vừa hướng dẫn cho các bạn cách tách Sheet thành từng file Excel riêng biệt bằng code VBA rồi nha.
Rất nhanh chóng và đơn giản phải không các bạn 😀
Chúc các bạn thành công !
CTV: Lương Trung – Hocviencanboxd.edu.vn
Note: Bài viết này hữu ích với bạn chứ? Đừng quên đánh giá bài viết, like và chia sẻ cho bạn bè và thân nhân của bạn nha !
Xem thêm: Cách so sánh dữ liệu trên 2 cột bằng hàm COUNTIF trên Excel
Từ khóa được tìm kiếm nhiều nhất năm 2022: tách file excel thành nhiều file nhỏ, tách sheet trong excel, cách tách sheet thành file trong excel, tách 1 file excel thành nhiều file, cách tách sheet thành file trong excel 2019, tách sheet trong excel 2016, cách tách file excel thành nhiều file nhỏ, tách sheet thành file excel, cách tách 1 sheet thành file trong excel, cách tách sheet thành file trong excel 2016, tách sheet trong excel 2010, cách lưu 1 sheet trong excel thành file riêng, tách nhiều sheet thành nhiều file, tách sheet trong excel 2019, tách 1 sheet thành nhiều file, tách sheet thành file, tách 1 sheet trong excel, tách 1 sheet trong excel thành 1 file, tách file excel, cách tách 1 sheet trong excel thành 1 file, cách tách sheet thành file trong excel 2010, cách tách các sheet trong excel thành file riêng, tách các sheet trong excel thành file riêng, cắt file excel, cách tách từng sheet trong excel, cách tách nhiều sheet thành file trong excel, cách cắt 1 sheet trong excel, tách sheet excel thành nhiều file, tách 1 sheet ra file mới, cách cắt file excel, cách tách file trong excel, cách lưu từng sheet trong excel, tách file excel thành nhiều sheet, cách tách riêng 1 sheet thành file trong excel, tách sheet trong excel thành nhiều file, tách dữ liệu từ 1 sheet ra nhiều sheet, cách tách file excel, cách tách sheet trong excel, cách lưu riêng 1 sheet trong excel, cách tách sheet thành từng file excel riêng biệt, lưu sheet thành 1 file, cách cắt sheet trong excel, tách file trong excel, tách 1 sheet thành 1 file, cắt sheet trong excel, cách tách file excel thành nhiều file theo điều kiện, tách các sheet thành file trong excel, vba tách sheet thành file, tách 1 file thành nhiều file, chia file excel thành nhiều file
Các câu hỏi về [Tuts] Cách tách Sheet thành từng file Excel riêng biệt trong Excel
Nếu có bắt kỳ câu hỏi thắc mắt nào vê [Tuts] Cách tách Sheet thành từng file Excel riêng biệt trong Excel hãy cho chúng mình biết nha, mõi thắt mắt hay góp ý của các bạn sẽ giúp mình nâng cao hơn hơn trong các bài sau nha