Cách 1: Thay thế bằng tay
Bước 1. Chọn vùng cần thay thế.Bước 2. Ấn Ctrl+H để mở Find & Replace dialog box.
Bước 3. Trong Find What nhấn Ctrl+SHIFT+J. Bạn sẽ không thấy gì cả nhưng thực sự đã có.
Bước 4. Trong Replace With , gõ bất kỳ ký tự nào bạn muốn thay thế (ví dụ phím cách).
.
Bước 5. Nhấn nút Replace All bạn sẽ thấy điều rất thú vị!
Cách 2: Sử dụng công thức
Bạn có thể sử dụng công thức sau
: =TRIM(SUBSTITUTE(SUBSTITUTE(B2,CHAR(13),""),CHAR(10),", ")
Chú ý: nếu bạn muốn thay thế các ký tự không hiện thị như ngắt dòng, tab, ...(nonprintable characters) sử dụng:
=CLEAN(B2)
Sử dụng code VBA macro của Excel
Mở worksheet (active worksheet) bảng tính đang làm việc và thêm lệnh:Sub RemoveCarriageReturns() Dim MyRange As Range Application.ScreenUpdating = False Application.Calculation = xlCalculationManual For Each MyRange In ActiveSheet.UsedRange If 0 < InStr(MyRange, Chr(10)) Then MyRange = Replace(MyRange, Chr(10), "") End If Next Application.ScreenUpdating = True Application.Calculation = xlCalculationAutomatic End Sub
Nếu bạn muốn được trợ giúp hoặc học trực tuyến
liên hệ Hotline: 098 909 5293 Email: dinhanhtuan68@gmail.com