我正在尝试将下面的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的更好方法?
您需要选择要写入CSV文件的范围。像这样参考您的范围:
Sheets("SAV_QC").Range("U2:AF2").Select
希望这会有所帮助!