Làm cách nào để tìm và thay thế tất cả các ô trống bằng một số hoặc văn bản nhất định trong Excel?
Đối với một dải ô có một số ô trống, bạn có thể cần tìm các ô trống này và thay thế chúng bằng một số nội dung nhất định. Trong bài viết này, chúng tôi cung cấp ba phương pháp cho bạn.
Tìm và thay thế tất cả các ô trống bằng chức năng Tìm và Thay thế
Tìm và thay thế tất cả các ô trống bằng mã VBA
Dễ dàng điền vào tất cả các ô trống trong một phạm vi với Kutools cho Excel
Tìm và thay thế tất cả các ô trống bằng chức năng Tìm và Thay thế
Bạn có thể sử dụng Tìm và Thay thế hàm thay thế tất cả các ô trống có nội dung nhất định trong Excel. Hãy làm như sau.
1. Chọn phạm vi có các ô trống bạn cần thay thế bằng nội dung nhất định, sau đó nhấn Ctrl + H đồng thời để mở hộp thoại Tìm và Thay thế.
2. Trong cửa sổ bật lên Tìm và Thay thế hộp thoại, bên dưới Thay thế tab, giữ Tìm ô trống, nhập văn bản nhất định bạn muốn thay thế các ô trống vào Thay thế bằng và cuối cùng nhấp vào Thay thế Tất cả cái nút. Xem ảnh chụp màn hình:
3. Nhấp vào OK trong hộp thoại sau.
Sau đó, tất cả các ô trống trong phạm vi đã chọn được thay thế bằng một số nội dung nhất định.
Dễ dàng điền vào tất cả các ô trống với giá trị nhất định trong Excel:
Kutools cho Excel's Điền vào các ô trống tiện ích giúp bạn dễ dàng điền vào tất cả các ô trống trong phạm vi đã chọn với một số hoặc văn bản nhất định trong Excel như hình minh họa bên dưới.
Tải xuống và dùng thử ngay bây giờ! (đường mòn miễn phí 30 ngày)
Tìm và thay thế tất cả các ô trống bằng mã VBA
Bạn cũng có thể áp dụng phương pháp VBA để thay thế tất cả các ô trống bằng nội dung nhất định trong một phạm vi. Hãy làm như sau.
1. Nhấn nút Khác + F11 các phím đồng thời để mở Microsoft Visual Basic cho ứng dụng cửa sổ.
2. bên trong Microsoft Visual Basic cho ứng dụng cửa sổ, nhấp Chèn > Mô-đun, sau đó sao chép và dán mã VBA bên dưới vào cửa sổ Mô-đun.
Mã VBA: Thay thế các ô trống bằng nội dung nhất định
Sub Replace_Blanks()
Dim xStr As String
Dim xRg As Range
Dim xCell As Range
Dim xAddress As String
Dim xUpdate As Boolean
On Error Resume Next
xAddress = Application.ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select a range", "Kutools for Excel", xAddress, , , , , 8)
Set xRg = xRg.SpecialCells(xlBlanks)
If (Err <> 0) Or (xRg Is Nothing) Then
MsgBox "No blank cells found", , "Kutools for Excel"
Exit Sub
End If
xStr = Application.InputBox("Replace blank cells with what?", "Kutools for Excel")
xUpdate = Application.ScreenUpdating
Application.ScreenUpdating = False
For Each xCell In xRg
xCell.Formula = xStr
Next
Application.ScreenUpdating = xUpdate
End Sub
3. Nhấn nút F5 phím để chạy mã. bên trong Kutools cho Excel hộp thoại, chọn phạm vi có các ô trống bạn cần tìm và thay thế, sau đó bấm vào OK .
4. Trong một Kutools cho Excel hộp thoại, nhập nội dung nhất định vào hộp văn bản và nhấp vào OK cái nút. Xem ảnh chụp màn hình:
Sau đó, tất cả các ô trống được thay thế bằng văn bản nhất định ngay lập tức như bạn đã chỉ định ở trên.
Chú thích: Nếu phạm vi đã chọn không chứa các ô trống, bạn sẽ nhận được hộp thoại sau.
Dễ dàng điền vào tất cả các ô trống trong một phạm vi với Kutools cho Excel
Sản phẩm Điền vào các ô trống tiện ích của Kutools cho Excel giúp bạn dễ dàng điền vào tất cả các ô trống với nội dung nhất định. Hãy làm như sau.
Trước khi áp dụng Kutools cho Excel, Xin vui lòng tải xuống và cài đặt nó trước tiên.
1. Chọn phạm vi có các ô trống bạn cần điền với nội dung nhất định, sau đó nhấp vào Kutools > Chèn > Điền vào các ô trống.
2. bên trong Điền vào các ô trống hộp thoại, kiểm tra Giá trị cố định tùy chọn trong Làm đầy với và sau đó nhập nội dung nhất định vào Giá trị được lấp đầy , cuối cùng nhấp vào OK .
Sau đó, tất cả các ô trống trong phạm vi đã chọn được lấp đầy bằng nội dung như hình ảnh chụp màn hình bên dưới.
Chú thích: Với tiện ích này, bạn cũng có thể điền vào các ô trống dựa trên các giá trị và điền vào các ô trống bằng các giá trị tuyến tính.
Nếu bạn muốn dùng thử miễn phí (30 ngày) tiện ích này, vui lòng nhấp để tải xuống, và sau đó đi đến áp dụng hoạt động theo các bước trên.
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!