只能用另存为的方式咯, 用vba代码实现。比如: Sub 保存() d = Format(Date, "yyyy年m月d日") s = ThisWorkbook.Name ThisWorkbook.SaveAs ThisWorkbook.Path & "" & s & d End Sub