[VBA] 刪除字串中頭尾的空白字元

應用範例1

Sub 刪除字串前端的空白字元()

MsgBox “刪除使用中儲存格內字串前端的空白字元”

ActiveCell.Value = LTrim(ActiveCell.Value)

End Sub

應用範例2

Sub 刪除字串前後端的空白字元()

moji = “ 彭 凱堯 ”

MsgBox “將變數moji前後端加上星號以利辨認其空白字元”

MsgBox “*” & moji & “*”

MsgBox “接著，刪除moji前後端的空白字元後，在其前後端加上星號，比較刪除前後的差異”

MsgBox “*” & Trim(moji) & “*”

End Sub

TRIM 刪除頭及尾空白字元函數：將字串開頭及結尾的空白字元刪除。

LTRIM 刪除開頭空白函數：將字串開頭的空白字元刪除。

RTRIM 刪除結尾空白函數：將字串結尾的空白字元刪除。

Sub 刪除字串尾端的空白字元()

MsgBox “刪除使用中儲存格內字串尾端的空白字元”

ActiveCell.Value = RTRIM(ActiveCell.Value)

End Sub