说明：
我正在编写一个从源中导入数据的VBA宏，然后在MS Excel文件中对其进行修改，然后在名为1407278460的第一个表中按正确的顺序进行修改。然后将此工作表复制到此文件中第一张工作表之前的新MS Excel文件中。 （这部分工作正常。）
现在我想将此文件另存为CSV格式。我的代码执行此操作但尚未按照我希望的方式执行此操作。首先在A1，B1，C1，H1等中的文本和/或值合并到单元格A1中。它为所有行执行此操作。空行填充1407278520个符号。结果示例：
Productieorder，228767 ,,,,,,,,,,
Artikelnummer，4022 631 79951 ,,,,,,,,,,
Bewerkingsnummer，14 ,,,,,,,,,,
Bewerkingsrevisie，1 ,,,,,,,,, Bestandslocatie ophalen :, Z：\ Parts Manufacturing \ 5。 Kwaliteit \ 130 - 处理过程中的meten \ macro voor oude excel bestanden omzetten \ Testbestanden
（在每个WegschrijfSheet，它应该跳转到下一个单元格。）
解决此问题的一种方法是将我的电脑设置从欧洲改为美国。其中,是十进制分隔符，反之亦然，但以,定义小数的值结束将使我无法使用我用于分析数据的软件的文件。 / p>
我可以以某种方式使用另一个分隔符而不是.来解决此问题吗？
我知道如何手动选择另一个分隔符，但不知道如何在VBA中执行此操作。或者更好的是，还有另一种解决方案吗？
（P.S。这个宏必须转换至少600个MS Excel文件，并计数。因此，手动转换所有文件不是一种选择。）
这是我的代码：
.