sub 宏1()for each stn in array("1","2","3") for each d in array("2020年2月1日","2020-2-2") '可以修改这来添加更多日期 sheets(stn).range("a1")=d sheets(stn).printout next dnext stnend sub
不改变原始表格数据,打印时自动添加打印日期。