othanhquango
Thành viên hoạt động



- Tham gia
- 6/3/09
- Bài viết
- 138
- Được thích
- 7
=1*Substitute(A2,Char(160),"")
Hoặc tô chọn cả vùng rồi nhấn Ctrl H:
Find What nhấn Alt và gõ 0160
Replace with để trống
Nhấn Replace All
Bạn nhấn giữ phím Alt, sau đó gõ lần lượt các số 0, 1, 6, 0 bên dãy phím số (phía bên phải bàn phím máy Desktop). Cuối cùng thả hết các phím là được.Thầy có thể chỉ rõ hơn cách gõ Alt và 0160 chi tiết được không? em không làm được
trước giờ em làm theo cách là copy 1 ký tự trắng trong ô rồi paste và trong hộp thoại Find What mà thôi
xin cảm ơn thầy nhiều
=1*Substitute(A2,Char(160),"")
Hoặc tô chọn cả vùng rồi nhấn Ctrl H:
Find What nhấn Alt và gõ 0160
Replace with để trống
Nhấn Replace All
Chắc là vậy chứ trên laptop em sử dụng không được, xin cảm ơn anh nhiềuBạn nhấn giữ phím Alt, sau đó gõ lần lượt các số 0, 1, 6, 0 bên dãy phím số (phía bên phải bàn phím máy Desktop). Cuối cùng thả hết các phím là được.
Trên laptop, bật Numlock lên, khi ấy các số 0, 1, 2, 3, 4, 5, 6, 7, 8 ,9 sẽ tương ứng với các phím M, J, K, L, U, I, O, 7 ,8, 9Chắc là vậy chứ trên laptop em sử dụng không được, xin cảm ơn anh nhiều
Cách gõ thì mọi người chỉ rồi, còn vụ copy 1 ký tự paste vào Find What thì có những ký tự vô hình không copy được. Thí dụ ký tự Char(10). Lúc đó phải gõ Alt 0010 mà thôiThầy có thể chỉ rõ hơn cách gõ Alt và 0160 chi tiết được không? em không làm được
trước giờ em làm theo cách là copy 1 ký tự trắng trong ô rồi paste và trong hộp thoại Find What mà thôi
xin cảm ơn thầy nhiều
Xin hỏi các cell A1:A3 là Char gì? Và cách nhận biết nó?
Em cảm ơn!
Sub TEST()
Dim cell
For Each cell In [A1:A3]
MsgBox AscW(cell)
Next
End Sub
=Code(A1)