摘要：思路比较简单，样式也单一，丑了点。 采用宏和时间函数，计算单元格偏移量，进行单元格填充。 Sub GenerateYearCalendar() Dim ws As Worksheet Set ws = ThisWorkbook.Sheets("Sheet1") ' 更改为你使用的表名 Dim yea 阅读全文