1.本节课主要讲的是VBA基础-2.5BeforeDoubleClick,主要讲的是点击日期后面记录报道的时间点。
2.选中日期后面的空格,在点击【开发工具】-【Visual Basic】,选择sheet1,将模式选择BeforeDoubleClick。
3.在代码处在写上Set Rng=Range("b2",[a1].End(xLDown)(1,4) Set rng1=Intersect(Rng,Target)。
4.在代码处在添加上Set rng1=Intersect(rng,Target) If Not rng1 Is Nothing Then。
5.在代码下面在添加上If Target.EntireRow.Range("a1").Value=Date Then Target=Format(Now,"h:m:s")
6.当代码写完以后,在点击日期下面的空格就会出现当时的时间记录下来。