Question

请教大虾，EXCEL如何利用VBA满足条件时在某单元格自动输入内容？

希望能实现，当A1与A2数值不相同时自动将A3的数值改为0；注意：A3本来有VBA代码记录打印次数，我在A1放了当前日期，A2放了表格更改日期记录，也就是希望当第二天打印时，打印次数又从0开始计数。

Answer 1

Sub 输入()
If [a2] <> [a1] Then [a3] = 0
End Sub

追问

朋友，非常感谢你的帮助，可是我试了没效果呀

追答

代码的功能是，当A2中的数据不等于A1单元格中的数据时，A3单元格中的数据为0。
你先让A2中的数据与A1不相等，然后运行代码看看效果。

追问

非常感谢！
我用下面这个代码搞定了。
Private Sub Workbook_Open()
With Sheet1
If .Range("s5") .Range("s9") Then
.Range("s6") = 0
End If
End With
End Sub