Note: The other languages of the website are Google-translated. Back to English

Làm cách nào để hủy hợp nhất các ô và điền các giá trị trùng lặp trong Excel?

Nếu bạn có một trang tính chứa nhiều ô đã hợp nhất và bây giờ bạn cần hủy hợp nhất chúng và tự động điền các giá trị ban đầu từ các ô đã hợp nhất như ảnh chụp màn hình sau được hiển thị. Làm thế nào bạn có thể nhanh chóng giải quyết nhiệm vụ này?

Hủy hợp nhất các ô và lấp đầy dữ liệu trùng lặp bằng lệnh Đi tới Đặc biệt

Hủy hợp nhất các ô và điền dữ liệu trùng lặp bằng mã VBA

Hủy hợp nhất các ô và lấp đầy dữ liệu trùng lặp bằng một cú nhấp chuột


mũi tên màu xanh bong bóng bên phải Hủy hợp nhất các ô và lấp đầy dữ liệu trùng lặp bằng lệnh Đi tới Đặc biệt

Với Đi đặc biệt , bạn có thể hủy hợp nhất các ô và điền vào các giá trị. Nhưng phương pháp này hơi rắc rối, vui lòng làm theo các bước sau:

1. Chọn các cột đã hợp nhất các ô.

2. Nhấp chuột Trang chủ > Hợp nhất & Trung tâm > Hủy hợp nhất các ô. Xem ảnh chụp màn hình:

3. Và các ô được hợp nhất đã không được hợp nhất và chỉ ô đầu tiên sẽ được lấp đầy bằng các giá trị ban đầu. Và sau đó chọn lại phạm vi.

4. Sau đó nhấn vào Trang chủ > Tìm & Chọn > Đi đặc biệt. Trong Đi đặc biệt hộp thoại, chọn Chữ trống Lựa chọn. Xem ảnh chụp màn hình:

5. Và sau đó nhấp vào OK, tất cả các ô trống trong phạm vi đã được chọn. Sau đó nhập = và báo chí Up phím mũi tên trên bàn phím. Xem ảnh chụp màn hình:

6. Sau đó nhấn Ctrl + Enter , tất cả các ô trống đã được lấp đầy bằng dữ liệu đã hợp nhất ban đầu. Xem ảnh chụp màn hình:


mũi tên màu xanh bong bóng bên phải Hủy hợp nhất các ô và điền dữ liệu trùng lặp bằng mã VBA

Với mã VBA sau, bạn có thể nhanh chóng hủy hợp nhất các ô và điền vào các giá trị.

1. Giữ ALT + F11 chìa khóa và nó mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đunvà dán macro sau vào Mô-đuncửa sổ.

Sub UnMergeSameCell () 'Upadateby Extendoffice
Dim Rng As Range, xCell As Range xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8) Application.ScreenUpdating = False Application.DisplayAlerts = Sai đối với mỗi Rng trong WorkRng Nếu Rng.MergeCells Thì Với Rng.MergeArea .UnMerge .Formula = Rng.Formula End With End If Next Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub

3. Sau đó nhấn F5 để chạy mã này, một hộp thoại được hiển thị để chọn một dải ô để làm việc, xem ảnh chụp màn hình:

4. Nhấp chuột OK, sau đó các ô được hợp nhất đã được hủy hợp nhất và tự động điền vào các giá trị được hợp nhất ban đầu.


mũi tên màu xanh bong bóng bên phải Hủy hợp nhất các ô và lấp đầy dữ liệu trùng lặp bằng một cú nhấp chuột

Với Hủy hợp nhất ô tiện ích của Kutools cho Excel, bạn có thể hủy hợp nhất các ô và điền dữ liệu trùng lặp với một cú nhấp chuột, phương pháp này rất đơn giản và tiện dụ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

Sau khi cài đặt Kutools cho Excel, bạn có thể làm như sau:

1. Chọn các cột bạn muốn hủy hợp nhất và điền vào dữ liệu.

2. Nhấp chuột Kutools > Hợp nhất & Tách > Hủy hợp nhất các ô & điền giá trị, xem ảnh chụp màn hình:

3. Và các ô được hợp nhất đã được hủy hợp nhất và được lấp đầy bằng các giá trị trùng lặp cùng một lúc. Xem ảnh chụp màn hình:


mũi tên màu xanh bong bóng bên phải Hủy hợp nhất các ô và lấp đầy dữ liệu trùng lặp với Kutools cho Excel

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. Tải xuống và dùng thử miễn phí ngay!

Bài viết liên quan:

Hợp nhất các hàng liền kề với cùng một dữ liệu trong Excel


Các công cụ năng suất văn phòng tốt nhất

Kutools cho Excel giải quyết hầu hết các vấn đề của bạn và tăng 80% năng suất của bạn

  • Tái sử dụng: Chèn nhanh công thức phức tạp, biểu đồ và bất cứ thứ gì bạn đã sử dụng trước đây; Mã hóa ô với mật khẩu; Tạo danh sách gửi thư và gửi email ...
  • Thanh siêu công thức (dễ dàng chỉnh sửa nhiều dòng văn bản và công thức); Bố cục đọc (dễ dàng đọc và chỉnh sửa số lượng ô lớn); Dán vào Dải ô đã Lọchữu ích. Cảm ơn !
  • Hợp nhất các ô / hàng / cột mà không làm mất dữ liệu; Nội dung phân chia ô; Kết hợp các hàng / cột trùng lặp... Ngăn chặn các ô trùng lặp; So sánh các dãyhữu ích. Cảm ơn !
  • Chọn trùng lặp hoặc duy nhất Hàng; Chọn hàng trống (tất cả các ô đều trống); Tìm siêu và Tìm mờ trong Nhiều Sổ làm việc; Chọn ngẫu nhiên ...
  • Bản sao chính xác Nhiều ô mà không thay đổi tham chiếu công thức; Tự động tạo tài liệu tham khảo sang Nhiều Trang tính; Chèn Bullets, Hộp kiểm và hơn thế nữa ...
  • Trích xuất văn bản, Thêm Văn bản, Xóa theo Vị trí, Xóa không gian; Tạo và In Tổng số phân trang; Chuyển đổi giữa nội dung ô và nhận xéthữu ích. Cảm ơn !
  • Siêu lọc (lưu và áp dụng các lược đồ lọc cho các trang tính khác); Sắp xếp nâng cao theo tháng / tuần / ngày, tần suất và hơn thế nữa; Bộ lọc đặc biệt bằng cách in đậm, in nghiêng ...
  • Kết hợp Workbook và WorkSheets; Hợp nhất các bảng dựa trên các cột chính; Chia dữ liệu thành nhiều trang tính; Chuyển đổi hàng loạt xls, xlsx và PDFhữu ích. Cảm ơn !
  • Hơn 300 tính năng mạnh mẽ. Hỗ trợ Office / Excel 2007-2021 và 365. Hỗ trợ tất cả các ngôn ngữ. Dễ dàng triển khai trong doanh nghiệp hoặc tổ chức của bạn. Đầy đủ tính năng Dùng thử miễn phí 30 ngày. Bảo đảm hoàn lại tiền trong 60 ngày.
tab kte 201905

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!
officetab dưới cùng
Nhận xét (47)
Chưa có xếp hạng. Hãy là người đầu tiên xếp hạng!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn vì đã hủy hợp nhất và trùng lặp mã vba
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Xuất sắc !! Mã VBA hoạt động hoàn hảo. đã khắc phục sự cố xuất sang CSV của tôi :)
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
VBA hoạt động tuyệt vời ngoại trừ tôi đã sử dụng nó cho một số 16 chữ số và excel chuyển chữ số cuối cùng thành "0". Bất kỳ đề xuất về một công việc xung quanh cho điều đó?
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cả hai phương pháp đều hoạt động hoàn toàn tốt. Cảm ơn bạn :-)
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
OMG, bạn vừa tiết kiệm cho tôi rất nhiều thời gian.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
điều này thật tuyệt. tiết kiệm cuộc sống
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Điều này đã tiết kiệm cho tôi vô số giờ, cảm ơn bạn rất nhiều vì điều này. Tôi đã nhận thấy một điều mà tôi đã gặp với Bộ Chỉ huy Đặc nhiệm Go To khiến tôi bối rối trong một giây. Tôi cần tìm kiếm trong tài liệu và hàm ctrl + enter sẽ sao chép mã, nhưng không sao chép giá trị. Tôi khuyên bạn nên (nếu bạn muốn tìm kiếm như tôi đã làm) sao chép hàng đã được hợp nhất, dán các giá trị đặc biệt. Thao tác này sẽ loại bỏ mã và tạo văn bản có thể tìm kiếm được. Cảm ơn bạn một lần nữa cho thủ thuật tuyệt vời này.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Công việc tốt. Nhưng phương thức Hàm hoạt động tốt đầu tiên trên 2288 dòng đầu tiên, sau đó không có lỗi hoặc thông báo, chỉ là không làm quá dòng đó. Tôi có hơn 6000 dòng (hàng). Nếu tôi chọn bất kỳ phạm vi nào ngoài dòng 2288 theo cách thủ công, phương pháp Hàm không hoạt động. Thật không may, nhà cung cấp dữ liệu hợp nhất các dòng trong việc cung cấp dữ liệu Excel. Bất kỳ đề xuất? Cảm ơn về thông tin tuyệt vời.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Hướng dẫn của bạn là đơn giản như mạnh mẽ !!! Tôi nợ bạn một bữa tối.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bạn đã cứu mạng tôi, bạn là lý do tại sao tôi đánh dấu trang này :) !!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cực kỳ hữu ích! Thanks!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Rất hữu ích ..! Cảm ơn rất nhiều.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Bạn đã thực hiện tuần của tôi! số 8)
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn bạn rất nhiều, đây là một bài viết rất hữu ích. Nó thực sự giúp tôi tiết kiệm rất nhiều thời gian
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cảm ơn rất nhiều cho giải pháp của bạn ...
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tuyệt vời! Hãy tiếp tục với công việc tốt!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Điều này thực sự hữu ích nhưng tôi có một câu hỏi. Có cách nào để sửa đổi mã VBA để bỏ qua các ô trống đã hợp nhất không? Tôi chỉ muốn ô không được hợp nhất và sao chép nếu có giá trị khác với ô trống. Tôi chắc rằng sẽ không mất nhiều hơn một hoặc hai câu lệnh if / else, tôi thực sự quá ngu ngốc để làm điều đó.
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Lời giải thích rất hay với ảnh chụp màn hình .... cảm ơn rất nhiều ...
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Cứu cuộc đời tôi! Cảm ơn bạn rất nhiều!
Nhận xét này đã được giảm thiểu bởi người điều hành trên trang web
Tốt nhất. tiết kiệm rất nhiều thời gian Cảm ơn
Không có bình luận nào được đăng ở đây
Tải thêm
Để lại ý kiến ​​của bạn
Đăng với tư cách khách
×
Đánh giá bài viết này:
0   Nhân vật
Các vị trí được đề xuất

Kết nối với chúng tôi

Bản quyền © 2009 - www.extendoffice.com. | Đã đăng ký Bản quyền. cung cấp bởi ExtendOffice. | BẢN ĐỒ CHI NHÁNH
Microsoft và logo Office là các nhãn hiệu hoặc nhãn hiệu đã đăng ký của Microsoft Corporation tại Hoa Kỳ và / hoặc các quốc gia khác.
Được bảo vệ bởi Sectigo SSL