[Tự động] Công Cụ Tách Sheet Thành Nhiều File Excel Nhanh

Hướng dẫn sử dụng công cụ để tách từng sheet trong Excel thành từng file Excel riêng biệt, bạn chỉ cần sử dụng mã code macro VBA là xong.

Xem >> Tách Dữ Liệu Thành Nhiều Sheet Trong Excel Tự Động Theo Cột (Thực hiện 5 bước)

tự dộng tách excel sheet thành nhiều file

Để tách nhiều sheet trong một file Excel thành nhiều file riêng biệt. Các bạn chỉ cần làm theo 3 bước hướng dẫn dưới đây

Tạo một thư mục trống trên máy tính dùng để chứa các file excel sẽ được tách ra
Copy file Excel chứa nhiều sheet cần tách vào thư mục mới tạo
Mở file Excel chứa nhiều sheet cần tách, nhấn tổ hợp phím ALT + F11 trong file excel có nhiều sheet cần tách ra thành nhiều file. Excel sẽ tự động mở cửa sổ trình soạn thảo mã lệnh VBA
Nhấn vào lệnh Insert --> Module, và copy/dán đoạn code bên dưới vào cửa sổ hiện lên

vba tách sheet excel thành nhiều file khác nhau

Sub Splitbook()
'Update20190816
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 & ".xlsx"
Application.ActiveWorkbook.Close False
Next
Application.DisplayAlerts = True
Application.ScreenUpdating = True
End Sub

tự động tách sheet excel thành nhiều file