Excel中的VBA代码

  • Z时代
  • 2024-01-10
  • 分类：问答

我有这段代码，虽然它声明有错误。 我想要做的是从当前活动工作表完成csv文件导出，并将其与目前在单元格A2中的信息一起保存。Excel中的VBA代码

Sub exportCSV() 
    ' export Macro 
    Range("A:F").Select 
    Selection.Copy 
    Workbooks.Add 
    ActiveSheet.Paste 
    strName = AprilPayslips.Range("A2") 
    ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\" & strName 
    , FileFormat:=xlCSV, CreateBackup:=False 
    Application.DisplayAlerts = False 
    Application.DisplayAlerts = True 
End Sub

回答：

如果你想有一个单元为一个字符串值，然后问它:)因为他们的立场

strName = Range("A2").Value

这两行不会做任何事情，所以删除它们：

Application.DisplayAlerts = False 
Application.DisplayAlerts = True

路径应始终包含斜线，这样你就不需要补充一点：

Sub exportCSV() 
    strName = Range("A2").Value 
    Range("A:F").Select 
    Selection.Copy 
    Workbooks.Add 
    ActiveSheet.Paste 
    ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & strName, FileFormat:=xlCSV, CreateBackup:=False 
End Sub

应该为你工作，但是除非你能确定A2的内容总是有效的文件名，否则你可能会遇到问题，除非你添加一些额外的验证。

以上是 Excel中的VBA代码 的全部内容， 来源链接： utcz.com/qa/263732.html

回到顶部