excel中如何实现 按一下保存按钮 excel自动按当前日期保存

这个可以用函数来实现Sub DateSave() Application.DisplayAlerts = False ActiveWorkbook.SaveAs Filename:= _ ThisWorkbook.Path & "" & Date & ".xls", _ FileFormat:=xlNormal, _ Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, _ CreateBackup:=False Application.DisplayAlerts = TrueEnd Sub 最后在运行宏中，来选择一个快捷键来实现这个就可以了。