Question

我才刚刚开始学习VBA，并构建了一个小型应用程序来导出特定的工作表。我想更进一步，只从该工作表中导出一个范围。

我尝试了各种不同的编码方案，但无济于事。

\n

谁能确认在导出工作表中的范围时将使用什么代码？我正在尝试仅在名为“数据”的工作表中导出范围A2：D24，而不是像上面的当前代码那样导出整个工作表。谢谢。

Answer 1

将范围复制到新工作簿中的新工作表。另存为。关闭。

    Dim myCSVFileName As String
    Dim tempWB As Workbook

    myCSVFileName = ThisWorkbook.Path & "\" & "EXPORT_" & VBA.Format(VBA.Now, "ddMMyyyy") & ".csv"
    'Create new Workbook.
    Set tempWB = Workbooks.Add
    'Copy Range
    ThisWrokbook.Sheets("SheetNameWithRange").Range("A1:Z40").Copy    
    With tempWB
        'Paste Range
        .Worksheets(1).Range("A1").Paste 'Or Paste as Values to not retain Links/Formulas
        'Save and Close
        .SaveAs FileName:=myCSVFileName, FileFormat:=xlCSV, CreateBackup:=False
        .Close
    End With

我可以使用VBA在工作表中仅导出范围吗？

1 个答案: