代码之家 › 专栏 › 技术社区 › obizues

如何从excel列中删除所有尾随空格?

vba removing-whitespace trim whitespace excel

obizues · 技术社区 · 6 年前

我使用trim函数删除excel中名称列列表中的尾随空格。然而,仍有相当多的名称在未删除的名称后有额外的空格。

我还尝试创建自己的:

Sub NoSpaces()
    Dim c As Range
    For Each c In Selection.Cells
        c.Value = Replace(c.Value, Chr(160), Chr(32))
    Next
End Sub

但是,我得到了一个错误:

编译错误:

未定义子或函数

任何帮助都将不胜感激。

编辑:根据建议将反映的方法更改为“替换”。

1 回复 | 直到 6 年前

obizues 6 年前

它由两部分组成:

首先转换非打断空格:

Sub ConvertNonBreakingSpaces()
Dim c As Range
    For Each c In Selection.Cells
        c.Value = Replace(c.Value, Chr(160), Chr(32))
    Next
End Sub

然后使用Trim函数删除所有正常空格(chr(32))。

Sub ClearSpaces()
Dim c As Range
    For Each c In Selection.Cells
        c.Value = Trim(c.Value)
    Next
End Sub

推荐文章

AncientShotgun · 自定义类不会过滤掉行尾字符或空格

6 年前

fairlyMinty · 闪亮仪表板顶部的空白

6 年前

Wouter van der Zee · 如何使用绝对定位覆盖div[duplicate]去除图像下方的空白

6 年前

jubilantdollop · 在Python中,如何从字符串数组的偏移量中去掉前导空格?

7 年前

Matt McManis · 字符串连接如何同时忽略空和换行符

7 年前

CTLearn · 如何在不使用字符串方法的情况下去除Python中的空白?

7 年前

neildt · 修剪不删除多个空白

8 年前

user1742529 Mihai · 如何git只添加非空白更改和新文件?

10 年前

BigSauce · 引导程序2导航栏和下面一行之间的神秘空白

11 年前