VBA文本文件的前导空格

Question

我正在编写一个代码(下面的示例(，该代码根据单元格值创建一个文本文件。

fpath = ActiveSheet.Range("E3")
Open fpath For Output As #2
For i = 9 To 30
t = Trim(ActiveSheet.Cells(i, 2))
Print #2, t, vbCrLf,
Next i
Close #2

但是，输出文本文件带有一些前导选项卡空间(下面的示例(。正如你所看到的，第一行看起来很完美。有人能帮我弄清楚出了什么问题吗？

22                                                                                                                                                                                                                                                                                                                 
24                                                                                                                                                                                                                                                                                                                 
mean          rms           pos           neg                                                                                                                                                                                                                                                                       
99.97                                                                                                                                                                                                                                                                                                              
99.97                                                                                                                                                                                                                                                                                                              
-1435341521848.46                                                                                                                                                                                                                                                                                                                 
-1472817751812.39                                                                                                                                                                                                                                                                                                                 
-1746441031333.17                                                                                                                                                                                                                                                                                                                 
-2565650848341.7                                                                                                                                                                                                                                                                                                                  
1586098400722.69                                                                                                                                                                                                                                                                                                                 
1651484149414.77                                                                                                                                                                                                                                                                                                                 
1886743487015.51                                                                                                                                                                                                                                                                                                                 
2846137892251.89                                                                                                                                                                                                                                                                                                                 
0.739329734466885             

Answer 1

而不是

Print #2, t, vbCrLf,

使用

Print #2, t