Nếu mỗi trang tính trong sổ làm việc Excel chứa nhiều biểu đồ và giờ bạn muốn di chuyển hàng loạt tất cả các biểu đồ sang một trang tính mới được tạo, bạn có thể tham khảo bài viết này. Ở đây chúng tôi sẽ giới thiệu cho bạn 2 cách dễ dàng.
Sau khi tạo biểu đồ cho dữ liệu trong mỗi trang tính của sổ làm việc Excel, để phân tích dữ liệu theo các biểu đồ này tốt hơn, bạn có thể muốn thu thập tất cả các biểu đồ này vào cùng một trang tính. Nói cách khác, bạn có thể hy vọng chuyển tất cả chúng sang một bảng tính mới. Nếu có ít biểu đồ, bạn chỉ cần sử dụng Phương pháp 1 sau để di chuyển từng biểu đồ. Tuy nhiên, nếu có vô số biểu đồ, tốt hơn hết bạn nên sử dụng biểu đồ thứ hai.
Phương pháp 1: Di chuyển biểu đồ theo cách thủ công từng cái một
- Đầu tiên, hãy tạo một bảng tính mới nơi bạn muốn di chuyển tất cả các biểu đồ.
- Sau đó, mở một trang tính và trình bày biểu đồ trong đó.
- Tiếp theo, nhấp chuột phải vào biểu đồ và chọn “Di chuyển biểu đồ” từ menu ngữ cảnh.
- Trong hộp thoại “Di chuyển biểu đồ” bật lên, chọn trang tính mới trong danh sách “Đối tượng trong” và nhấp vào “OK”.
- Ngay lập tức, biểu đồ đã chọn sẽ được di chuyển.
- Bây giờ, bạn có thể sử dụng cách này để xử lý từng biểu đồ trong tất cả các trang tính.
Cách 2: Di chuyển hàng loạt bằng Excel VBA
- Để bắt đầu, hãy khởi chạy trình soạn thảo Excel VBA theo “Cách chạy mã VBA trong Excel của bạn".
- Sau đó, đặt đoạn mã sau vào một mô-đun hoặc dự án.
Sub MoveAllCharts()
Dim strNewSheet As String
Dim objTargetWorksheet As Worksheet
Dim objWorksheet As Worksheet
Dim objChart As Object
'Create a new sheet
strNewSheet = "Charts"
ActiveWorkbook.Worksheets.Add(Before:=Application.Worksheets(1)).Name = strNewSheet
Set objTargetWorksheet = Application.Worksheets(strNewSheet)
For Each objWorksheet In Application.ActiveWorkbook.Worksheets
If objWorksheet.Name <> strNewSheet Then
'Move each chart to the new sheet one by one
For Each objChart In objWorksheet.ChartObjects
objChart.Chart.Location xlLocationAsObject, strNewSheet
Next objChart
End If
Next
objTargetWorksheet.Activate
End Sub
- Sau đó nhấn trực tiếp “F5” để chạy macro này ngay.
- Khi macro kết thúc, hãy thoát trình soạn thảo VBA.
- Trong cửa sổ chính của Excel, bạn có thể thấy một bảng tính mới, trong đó bạn có thể xem tất cả các biểu đồ.
sự so sánh
| Ưu điểm | Nhược điểm | |
| Phương pháp 1 | Dễ dàng hoạt động | Bạn phải di chuyển từng cái một |
| Phương pháp 2 | Có thể xử lý hàng loạt tất cả các biểu đồ | Người dùng phải cẩn thận với các macro bên ngoài |
Sửa chữa tệp Excel bị hỏng
Tệp Excel dễ bị hỏng vì Excel thỉnh thoảng có thể bị lỗi. Trong hoàn cảnh như vậy, tốt nhất bạn nên chuẩn bị một lực lượng mạnh mẽ và đáng tin cậy. phục hồi xlsx công cụ, chẳng hạn như DataNumen Excel Repair. Nó sẽ có ích khi file Excel của bạn bị lỗi và tính năng tự động khôi phục của Excel không hoạt động.
Giới thiệu tác giả:
Shirley Zhang là một chuyên gia phục hồi dữ liệu trong DataNumen, Inc., công ty hàng đầu thế giới về công nghệ khôi phục dữ liệu, bao gồm sửa chữa sql và các sản phẩm phần mềm sửa chữa triển vọng. Để biết thêm thông tin, hãy truy cập www.datanumennăm