使用“打印”时的空格在VBA中

Question

由于某种原因，我在尝试打印到平面文本文件时，每个值前面都有很多空格。

'append headers
Cells(start_row - 2, 1).Select
For i = 1 To ActiveCell.SpecialCells(xlLastCell).Column
    If ActiveCell.Offset(0, 1).Column = ActiveCell.SpecialCells(xlLastCell).Column Then
        Print #finalCSV, Cells(start_row - 2, i) & "\n",
    Else
        Print #finalCSV, Cells(start_row - 2, i) & ",",
    End If
Next i

输出示例：

DC Capacity:hi,             Resistive Capacity:lo,      Resistive Capacity:hi,      Reactive Capacity:lo,

有什么方法可以去掉这些空格吗？

Answer 1

Print #finalCSV, Cells(start_row - 2, i) & ",";

如果我没记错的话，VB 中的逗号会插入制表符，而分号只会抑制换行符。

Answer 2

Print #finalCSV, Trim(Cells(start_row - 2, i)) & ",",

Answer 3

文森特的答案是正确的，但我想让它更清楚：

打印#finalCSV，单元格(start_row - 2, i) & “，”，

将给出这种输出：

> DC Capacity:hi,             Resistive Capacity:lo,      Resistive
> Capacity:hi,      Reactive Capacity:lo,

并在句子末尾使用分号：

打印#finalCSV，单元格(start_row - 2, i) & “，”；

会给你这个输出：

> DC Capacity:hi,Resistive Capacity:lo,Resistive Capacity:hi,Reactive
> Capacity:lo,