首页 > 解决方案 > 将特定范围附加到 CSV

问题描述

我正在尝试将下面的 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?

标签: exceldatabasevbacsvappend

解决方案


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

请参考您的范围,如下所示:

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

希望这可以帮助!


推荐阅读