需要从工作表中提取选项卡并将新文件另存为特定目录，文件名为今天的日期

Question

我是该网站和VBA的新手。我想从excel中的1个选项卡复制数据，将数据粘贴到新工作表中，然后将新工作表保存到特定目录中，今天的日期为新保存文件的名称。如何使用VBA做到这一点？它会每天在同一确切时间发生。我想我会结合使用onTime和其他脚本人在这里为我提供的帮助。预先感谢。

Answer 1

这只需要VBA中的几行代码：

Sub SaveSheet1()
    'This will copy the sheet and by default stick it in a new workbook
    Sheets("Sheet1").Copy
    'That new workbook is now the "ActiveWorkbook" so save it.
    ActiveWorkbook.SaveAs ("C:\my_new_workbook" & Format(Now(), "YYYYMMDD") & ".xls")

End Sub

Answer 2

与其建议使用用户可以轻松更改的选项卡名称，不如建议使用工作表的代号。