需要用 VBA功能，这样才能满足需求，如下是具体的操作方式，将代码贴上去即可。
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Row > 1 And Target.Column > 1 Then
If Cells(Target.Row, 1) = "" Then
Cells(Target.Row, 1) = Date
End If
End If
End Sub
，
不改变原始表格数据，打印时自动添加打印日期。
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024