将特定范围附加到 CSV答案

【问题标题】：Append specific range to CSV将特定范围附加到 CSV
【发布时间】：2020-10-01 11:21:54
【问题描述】：

我正在尝试将下面的 excel 表格（跳过标题）附加到 CSV 文件中。

我有以下代码，但它只附加范围“U2”。如果我选择“U2:AF2”，则会引发调试错误。

Sub AppendtoCSV()
    Dim strFile_Path As String
    strFile_Path = "\\cpath\SAV_QC.csv"
    Open strFile_Path For Append As #1
    Write #1, Sheets("SAV_QC").Range("U2")
    Close #1
End Sub

是否有特定的方法来设置写入函数的范围，或者是否有更好的方法将特定范围附加到将在 Access 中导入的 CSV？

【问题讨论】：

标签： excel database vba csv append

【解决方案1】：

您需要选择要写入 CSV 文件的范围。然后将该选择复制到您刚刚打开的文件中。尝试复制单元格，而不是写入文件。

像这样参考你的范围：

Sheets("SAV_QC").Range("U2:AF2").Select
Selection.Copy

希望这会有所帮助！

【讨论】：

我尝试指定该范围，但它仍然只附加了 U2 值并跳过了 V2:AF2。