小编jwo*_*off的帖子

到目前为止我有这个:

Sub new_book()

    Sheets(Array("Document Data", "Invoice data", "Summary", "Invoice")).Copy
    ActiveWorkbook.SaveAs Filename:=Range("D1") & Format(Date, "ddmmyyyy") & ".xlsx", FileFormat:=52

End Sub

但是我得到运行时错误1004,它突出显示ActiveWorkbook行.究竟出了什么问题？感谢您的时间.