工作表函数 Trim()

WorksheetFunction.Trim 方法

 

作用：

删除文本中的所有空格（除了单词之间的单个空格外）。

使用目的：

对于从其他应用程序中获取带有不规则空格的文本，可以使用 TRIM。

语法：

表达式.Trim(Arg1)

表达式   一个代表 WorksheetFunction 对象的变量。

参数：

名称	必选/可选	数据类型	说明
Arg1	必选	String	Text - 要从中删除空格的文本。

返回值：
String

说明：

要点  　TRIM 函数设计用于从文本中剪裁掉 7 位 ASCII 空格字符（值 32）。

　　　　在 Unicode 字符集中，有称为不间断空格字符的其他空格字符，其十进制值为 160。

　　　　此字符通常在网页中作为 HTML 实体   使用。TRIM 函数本身并不会删除此不间断空格字符。

实例：

Sub 分解字符串()
h = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To h
    Cells(i, 2) = WorksheetFunction.Trim(Cells(i, 1))
    arr = Split(Cells(i, 2), " ")
    k = UBound(arr)
    Range(Cells(i, 3), Cells(i, 3 + k)) = arr
Next i
End Sub