從指定字串中移除非列印字元 (字元代碼 1–29) 及特殊 Word 字元，或將其改為空格 (字元代碼 32) 。 會以 String 傳回結果。
語法
expression。
CleanString( _String_ )
expression 代表 Application 物件的變數。 選用。
參數
| 名稱 | 必要/選用 | 資料類型 | 描述 |
|---|---|---|---|
| 字串 | 必要 | 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 支援與意見反應。