Word) (Application.CleanString 方法
從指定的字串中移除 (字元碼 1–29) 和特殊 Word 字元的非列印字元,或將它們變更為空格 (字元碼 32) 。 會以 String 傳回結果。
語法
expression。 CleanString
( _String_
)
expression 代表 Application 物件的變數。 選用。
參數
名稱 | 必要/選用 | 資料類型 | 描述 |
---|---|---|---|
String | 必要 | String | 來源字串 |
註解
下列字元會依下表所述的方式進行轉換。
字元碼 | 說明 |
---|---|
7 (嗶聲) | 會移除,但如果前面加上字元 13 (段落),則會轉換成字元 9 (定位點) |
10 (換行符號) | 會轉換成字元 13 (段落),但如果前面加上字元 13,則會移除 |
13 (段落) | 不會變更 |
31 (選擇性連字號) | 會移除 |
160 (不分行空格) | 會轉換成字元 32 (空格) |
172 (選擇性連字號) | 會移除 |
176 (不分行空格) | 會轉換成字元 32 (空格) |
182 (段落標記) | 會移除 |
183 (項目符號) | 會轉換成字元 32 (空格) |
範例
此範例會從選取的文字中移除非列印字元,並將結果插入新文件中。
Dim strClean As String
Dim docNew As Document
strClean = Application.CleanString(Selection.Text)
Set docNew = Documents.Add
docNew.Content.InsertAfter strClean
此範例會從選取的功能變數代碼中移除非列印字元,然後顯示結果。
ActiveDocument.ActiveWindow.View.ShowFieldCodes = True
ActiveDocument.Fields(1).Select
MsgBox Application.CleanString(Selection.Text)
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。