VBA中如何用CLEAN函数清除一列看不见的双引号？

Posted 2023-04-17

参考技术A Sub xiaochu()\\x0d\\x0aDim arr As Range\\x0d\\x0aFor Each arr In Sheets("sheet1").UsedRange\\x0d\\x0a arr = Application.WorksheetFunction.Clean(arr.Value)\\x0d\\x0aNext\\x0d\\x0aEnd Sub\\x0d\\x0a\\x0d\\x0aarr本来就表示单元格了，你还用cells(arr)干什么？注意要DIM arr as range，不然arr为变体型了。\\x0d\\x0aSub aaa()\\x0d\\x0aSheets("Sheet1").Cells.Replace Chr(34), "" \'清除双引号\\x0d\\x0aEnd Sub

vb去掉字符串中的双引号

参考技术A a="""123"""
'去掉如下
a=replace(a,"""","")
'主要涉及双引号的转义