求助老师指点(推测不是ASCII内的) 非显示字符的替换

V5678 · 发表于 2019-5-22 10:40

有无可能做成条件格式？请各位指点。谢谢

V5678 · 发表于 2019-5-22 10:41

V5678 发表于 2019-5-22 10:40
有无可能做成条件格式？请各位指点。谢谢

有无可能做成条件格式？请各位指点。谢谢
能用公式找到位置吗？谢谢

V5678 · 发表于 2019-5-22 10:42

有无可能做成条件格式？请各位指点。谢谢
能用公式找到位置吗？谢谢

V5678 · 发表于 2019-5-22 17:52

论坛发帖怎么会重发好几遍呢？不是故意的。

V5678 · 发表于 2019-5-22 17:53

不过还需各位指导
能用公式找到位置吗？用公式逐个字符比对替换如何写，请帮忙，谢谢

YZC51 · 发表于 2019-5-22 18:49

学习老师的代码。谢谢老师！
Sub lqxs()
Dim Arr, i&, b$, Brr, j&
Arr = [a1:a3]
For j = 1 To UBound(Arr)
ReDim Brr(1 To Len(Arr(j, 1)))
For i = 1 To Len(Arr(j, 1))
b = Mid(Arr(j, 1), i, i)
'If Asc(b) = 63 Then Cells(j, 1).Replace b, "Q"
If Asc(b) = 63 Then Cells(j, 1).Interior.Color = 255
Next
Next
End Sub

V5678 · 发表于 2019-5-23 15:01

请各位指导
能用公式找到位置吗？用公式逐个字符比对替换如何写，请帮忙，谢谢

V5678 · 发表于 2019-5-24 09:06

请各位指导
能用公式找到位置吗？用公式逐个字符比对替换如何写，请帮忙，谢谢

melville · 发表于 2019-5-24 16:44

公式用这个可以替换
=SUBSTITUTE(A1,UNICHAR(8203),"Q")

V5678 · 发表于 2019-5-24 17:57

melville 发表于 2019-5-24 16:44
公式用这个可以替换
=SUBSTITUTE(A1,UNICHAR(8203),"Q")

请教，能用公式找到位置吗？

		自动登录	找回密码
密码			免费注册

[求助] 求助老师指点(推测不是ASCII内的) 非显示字符的替换