从vba中的文本string中删除空格

我试图在Excel中debugging一个函数来使用导入的文本文件中的数据分隔表格。 当名称中有一个空格时,macros有一个问题(请参阅示例,第二行),因为表是用空格分隔的。 我目前的代码对于示例的第一行工作正常。 一个表存在多行与此类似的行。

从文本文件导入的表格的示例

在这里输入图像说明

所以问题出现在“WT 03”这样的东西出现时,有空间,程序崩溃。 我已经尝试修剪,find并replace,但他们不工作,因为整个行被包含在第一列,并用空格分隔。 我只想消除在“Wt02”或“WT 03”中发现的任何空格。

任何意见或build议在哪里看,将不胜感激。

你有任何控制数据导出的格式? 如果是这样,你应该改变它使用不同的分隔符,如CSV(“WT 03”,“68.44”,“91.13”…)。

如果没有,你可以尝试用多个空格分隔值。 看起来合法字段之间至less有5-6个空格,所以请使用Split函数分割它们,如下所示:

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

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