Excel 宏以删除ASCII代码

Excel 宏以删除ASCII代码,excel,vba,Excel,Vba,是否有Excel宏删除ASCII代码,如”;等等 有一个类似CLEAN的函数,用于不可打印的字符吗?您的意思是: Sub kleanup() Cells.Replace what:=Chr(148), replacement:="" End Sub 您可以在给定的单元格中搜索字符,并将其替换为所需的任何内容 Dim iIndex as integer Dim szValue as String szValue = Range("A1").Value iIndex = InStr

是否有Excel宏删除ASCII代码,如”;等等


有一个类似CLEAN的函数,用于不可打印的字符吗?

您的意思是:

Sub kleanup()
  Cells.Replace what:=Chr(148), replacement:=""
End Sub

您可以在给定的单元格中搜索字符,并将其替换为所需的任何内容

Dim iIndex as integer
Dim szValue as String

szValue = Range("A1").Value

iIndex = InStr(szValue, Chr(148))
If iIndex <> 0 Then
    Mid(szValue, iIndex, 1) = " "
End If

Range("A1").Value = szValue
Dim iIndex作为整数
将值设置为字符串
szValue=范围(“A1”).值
iIndex=仪表(szValue,Chr(148))
如果指数为0,则
中间值(szValue,iIndex,1)=“”
如果结束
范围(“A1”)。值=szValue

请澄清您的问题。是否要从整个工作表/工作簿的单元格中删除所有#148个字符?还请分享您已经尝试过的内容。事实上,我想将其应用于excel文件的所有区域单元格