Giả sử giá trị 4 không được có giá trị 18 trong tất cả các hàng dữ liệu của tôi.
Làm cách nào để thay thế giá trị 4 bằng bất kỳ giá trị nào cho tất cả các hàng có giá trị 18?
Xem hình dưới đây:
Giả sử giá trị 4 không được có giá trị 18 trong tất cả các hàng dữ liệu của tôi.
Làm cách nào để thay thế giá trị 4 bằng bất kỳ giá trị nào cho tất cả các hàng có giá trị 18?
Xem hình dưới đây:
Câu trả lời:
Dựa trên hiểu biết của tôi về câu hỏi của bạn, tôi đề xuất VBA Macro để tự động hóa tác vụ này. Tôi giả sử bạn đang tìm kiếm Số 4 thực tế chứ không phải ký tự 4. Vì vậy, nếu là 44 thì nên bỏ qua và không cố gắng thay thế.
Trong bảng tính của bạn, nhấn ALT + F11 để truy cập VBA Editor. Từ Menu Chèn chèn Mô-đun . Nhấp đúp chuột vào tên Mô-đun trong khung bên trái để truy cập trình chỉnh sửa mã. Bây giờ dán đoạn mã sau vào nó.
Sub Replace4()
Dim MyRange As Range
Dim RowCount As Long
Dim ColCount As Integer
Dim i, j, k
Const Replaced = 0
Set MyRange = Range("B2:F12")
RowCount = MyRange.Rows.Count
ColCount = MyRange.Columns.Count
For i = 1 To RowCount
If MyRange.Columns(1).Cells(i) = 18 Then
For j = 2 To ColCount
If MyRange.Columns(j).Cells(i) = 4 Then
MyRange.Columns(j).Cells(i).Value = Replaced
End If
Next j
End If
Next i
End Sub
Lưu ý rằng bạn nên đặt Const Replaced = 0Giá trị thay thế liên tục (xem ) thành giá trị dự định và chỉ định phạm vi của bạn tại dòngSet MyRange = Range("B2:F12")
Đảm bảo rằng cột đầu tiên của phạm vi này thực sự là các cột mà bạn đang kiểm tra sự hiện diện của 18.
Lưu bảng Excel dưới dạng xlsm cho Excel 2007 trở lên (bảng tính được bật Macro).
Bây giờ trong bảng tính của bạn, nhấn ALT + F8 để truy cập hộp thoại Macro và chạy Macro này có tên là Thay4