从vba中的文本字符串中删除空格

时间:2016-10-12 02:35:58

标签: excel vba excel-vba delimiter trim

我正在尝试调试excel中的函数,以便使用导入的文本文件中的数据来分隔表。当名称中有空格时,宏会出现问题(请参阅示例,第二行),因为表是使用空格分隔的。我目前的代码适用于示例的第一行。存在一个包含与此类似的多行的表。

从文本文件

导入的表格行示例

enter image description here

所以问题是当出现像“WT 03”这样的东西时,有一个空格,程序会崩溃。我试过修剪并找到&替换但它们不起作用,因为整行包含在第一列中并用空格分隔。我只想删除“Wt02”或“WT 03”中发现的任何空格。

任何关于在哪里寻找的建议或建议都将受到赞赏。

1 个答案:

答案 0 :(得分:0)

您是否可以控制数据导出的格式?如果是这样,您应该将其更改为使用不同的分隔符,例如CSV(" WT 03"," 68.44"," 91.13" ...)。

如果没有,您可以尝试将值分隔多个空格。看起来合法字段之间至少有5-6个空格,因此请尝试使用Split功能将它们分开,如下所示:

Dim MyArr() as String
MyArr = Split(InputTextLine, "     ")

然后修剪每个数组值以删除多余的空格。