Làm cách nào để xuất và lưu từng trang tính dưới dạng sổ làm việc mới riêng biệt trong Excel?
Giả sử bạn muốn xuất và lưu một hoặc một số trang tính làm sổ làm việc mới, bạn sẽ xử lý như thế nào? Thông thường, bạn có thể sao chép từng trang tính và dán vào sổ làm việc mới. Nhưng ở đây chúng tôi mang đến cho bạn một số thủ thuật hữu ích để đối phó với nó:
Xuất và lưu trang tính dưới dạng sổ làm việc mới bằng lệnh Di chuyển hoặc Sao chép
Xuất và lưu trang tính dưới dạng sổ làm việc mới với mã VBA
Xuất và lưu trang tính dưới dạng sổ làm việc mới với Kutools cho Excel
Xuất và lưu trang tính dưới dạng sổ làm việc mới bằng lệnh Di chuyển hoặc Sao chép
Sử dụng Di chuyển hoặc sao chép lệnh sẽ giúp bạn xuất hoặc sao chép một hoặc một số trang tính sang một sổ làm việc mới một cách nhanh chóng.
Bước 1: Chọn tên trang tính trong thanh tab. Bạn có thể chọn nhiều bằng cách nhấn giữ Ctrl phím hoặc thay đổi Chìa khóa.
Bước 2: Nhấp chuột phải vào tên trang tính và nhấp vào Di chuyển hoặc sao chép từ menu ngữ cảnh.
Bước 3: Trong Di chuyển hoặc sao chép hộp thoại, chọn (sách mới) mục từ danh sách thả xuống của Di chuyển các trang tính đã chọn vào sách.
Bước 4: Sau đó nhấp vào OK, bây giờ bạn đã chuyển sang sổ làm việc mới với các trang tính được xuất hoặc sao chép, hãy nhấp vào Tập tin > Lưu để lưu sổ làm việc mới.
Lưu ý: Trong tạp chí Di chuyển hoặc sao chép hộp thoại, có một Tạo một bản sao Lựa chọn. Nếu bạn không kiểm tra nó, nó sẽ di chuyển các trang tính đã chọn ra khỏi sổ làm việc gốc; nếu kiểm tra nó, nó sẽ sao chép các trang tính đã chọn.
Nhanh chóng chia nhiều trang tính thành sổ làm việc riêng biệt trong Excel
|
Trong Microsoft Excel, bạn có thể lưu hoặc tách trang tính từ một sổ làm việc dưới dạng tệp Excel mới bằng cách sao chép và dán trang tính này vào một sổ làm việc mới. Có vẻ rắc rối, nếu bạn muốn chia từng sheet / worksheet của một sổ làm việc lớn thành các tệp Excel, txt, csv, pdf riêng biệt. Nhưng vơi Kutools cho Excel'S Chia sổ làm việc tiện ích, bạn có thể nhanh chóng đối phó với nó. Nhấp để dùng thử miễn phí 30 ngày với đầy đủ các tính năng! |
Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. |
Xuất và lưu trang tính dưới dạng sổ làm việc mới với mã VBA
Đoạn mã sau đây sẽ xuất mọi trang tính hiển thị trong sổ làm việc mới và lưu sổ làm việc với tên của trang tính ban đầu trong một thư mục mới được tạo theo cùng đường dẫn với sổ làm việc đang hoạt động. Vui lòng thực hiện theo các bước sau:
Bước 1: Giữ phím ALT + F11 chìa khóa và nó mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
Bước 2: Nhấp Chèn > Mô-đunvà dán macro sau vào Cửa sổ mô-đun:
VBA: Xuất và lưu trang tính dưới dạng sổ làm việc mới trong một thư mục mới.
Sub SplitWorkbook()
'Updateby20200806
Dim FileExtStr As String
Dim FileFormatNum As Long
Dim xWs As Worksheet
Dim xWb As Workbook
Dim xNWb As Workbook
Dim FolderName As String
Application.ScreenUpdating = False
Set xWb = Application.ThisWorkbook
DateString = Format(Now, "yyyy-mm-dd hh-mm-ss")
FolderName = xWb.Path & "\" & xWb.Name & " " & DateString
If Val(Application.Version) < 12 Then
FileExtStr = ".xls": FileFormatNum = -4143
Else
Select Case xWb.FileFormat
Case 51:
FileExtStr = ".xlsx": FileFormatNum = 51
Case 52:
If Application.ActiveWorkbook.HasVBProject Then
FileExtStr = ".xlsm": FileFormatNum = 52
Else
FileExtStr = ".xlsx": FileFormatNum = 51
End If
Case 56:
FileExtStr = ".xls": FileFormatNum = 56
Case Else:
FileExtStr = ".xlsb": FileFormatNum = 50
End Select
End If
MkDir FolderName
For Each xWs In xWb.Worksheets
On Error GoTo NErro
If xWs.Visible = xlSheetVisible Then
xWs.Select
xWs.Copy
xFile = FolderName & "\" & xWs.Name & FileExtStr
Set xNWb = Application.Workbooks.Item(Application.Workbooks.Count)
xNWb.SaveAs xFile, FileFormat:=FileFormatNum
xNWb.Close False, xFile
End If
NErro:
xWb.Activate
Next
MsgBox "You can find the files in " & FolderName
Application.ScreenUpdating = True
End Sub
Bước 3: Nhấn F5 phím để chạy mã này. Và một hộp nhắc sẽ bật lên để cho bạn biết vị trí của các sổ làm việc được xuất mới và tất cả các trang tính của sổ làm việc gốc đã được xuất sang một số sổ làm việc riêng biệt mới có tên là các trang tính gốc trong một thư mục cụ thể mới. Xem ảnh chụp màn hình:
Xuất và lưu trang tính dưới dạng sổ làm việc mới với Kutools cho Excel
Nếu bạn có nhiều trang tính cần được lưu dưới dạng sổ làm việc riêng biệt, phương pháp đầu tiên không thể là một lựa chọn tốt. Và mã VBA có thể hơi phức tạp đối với người mới bắt đầu sử dụng Excel. Ở đây bạn có thể sử dụng Chia sổ làm việc tiện ích của Kutools cho Excel để nhanh chóng và dễ dàng xuất và lưu từng trang tính của một sổ làm việc để tách sổ làm việc mới.
Kutools cho Excel, với hơn 300 chức năng tiện dụng, giúp công việc của bạn dễ dàng hơn. | ||
Sau cài đặt miễn phí Kutools cho Excel, vui lòng làm như sau:
Bước 1: Nhấp Kutools Plus > Bảng tính > Chia sổ làm việc…. Xem ảnh chụp màn hình:
Bước 2: Trong Chia sổ làm việc hộp thoại, làm như dưới đây:
2: Nếu bạn muốn tránh chia nhỏ các trang tính bị ẩn hoặc trống, bạn có thể kiểm tra Bỏ qua trang tính ẩn or Bỏ qua trang tính trống.);
3: và bạn cũng có thể kiểm tra Chỉ định lưu định dạng, và để chọn tách các trang tính, sau đó lưu dưới dạng tệp văn bản, tệp pdf hoặc tệp csv, trong defualt, nếu bạn không chọn tùy chọn này, nó sẽ chia trang tính và lưu dưới dạng sổ làm việc.
Bước 3: Sau đó nhấp vào chẻ và chọn thư mục mà bạn muốn đặt các sổ làm việc mới vào. Xem ảnh chụp màn hình:
Bước 4: Và sau đó nhấp vào OK, sau đó mỗi trang tính được kiểm tra trong Chia sổ làm việc hộp thoại được xuất và lưu dưới dạng sổ làm việc riêng lẻ. Mỗi sổ làm việc mới được đặt tên với tên trang tính ban đầu. Xem ảnh chụp màn hình:
Nhấp để biết thêm thông tin về công cụ Split Workbook này.
Xuất và lưu từng trang tính dưới dạng sổ làm việc mới
Nhanh chóng chia dữ liệu thành nhiều trang tính dựa trên cột hoặc hàng cố định trong Excel
|
Giả sử bạn có một trang tính có dữ liệu từ cột A đến G, tên nhân viên bán hàng nằm trong cột A và bạn cần tự động chia dữ liệu này thành nhiều trang tính dựa trên cột A trong cùng một sổ làm việc và mỗi nhân viên bán hàng sẽ được chia thành một bảng tính. Kutools cho Excel'S Ngày chia tách tiện ích có thể giúp bạn nhanh chóng chia dữ liệu thành nhiều trang tính dựa trên cột đã chọn như ảnh chụp màn hình bên dưới được hiển thị trong Excel. Nhấp để dùng thử miễn phí 30 ngày đầy đủ tính năng! |
Kutools cho Excel: với hơn 300 bổ trợ Excel tiện dụng, dùng thử miễn phí không giới hạn trong 30 ngày. |
Các bài liên quan:
- Kết hợp nhiều sổ làm việc thành một sổ làm việc
- Lưu lựa chọn dưới dạng tệp riêng lẻ
- Tách sổ làm việc để tách các tệp Excel
Công cụ năng suất văn phòng tốt nhất
Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian. Bấm vào đây để có được tính năng bạn cần nhất...
Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều
- Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
- Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
- Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!