最伤心的事情了

发布员 2024-06-20 20:04:48 0条评论

看到吧友求助，就写了代码，发现被拉黑

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
Dim objSheet As Excel.Worksheet
Set objSheet = Target.Worksheet

If Target.Cells.Column = 1 Or Target.Cells.Column = 2 Then
objSheet.Cells(Target.Row, 3).Value = Now
End If
End Sub

最伤心的事情了 - 线报迷

demo.rar

2024-6-20 20:01 上传

点击文件名下载附件

57.86 KB, 下载次数: 0

海尔怎么支付失败了建行36立减金