
excel表格中,我利用ActiveX控件制作了一个命令按钮CommandButton1,我想在D2内记录用鼠标点击它的时间,
4个回答
展开全部
Private Sub CommandButton1_Click()
Range("d2") = Now()
End Sub
上面网友shf_7113 的回答也可以,但他用的是EXCEL的NOW()函数公式,这样在表格更新操作时会自己改变数值.
不如直接用VBA的NOW()函数,直接求出时间,再显示在D2单元格中,这个值就不会随着表格更新而改变了.
Range("d2") = Now()
End Sub
上面网友shf_7113 的回答也可以,但他用的是EXCEL的NOW()函数公式,这样在表格更新操作时会自己改变数值.
不如直接用VBA的NOW()函数,直接求出时间,再显示在D2单元格中,这个值就不会随着表格更新而改变了.
展开全部
这VBA也在学,刚刚试了一下,这样好像可以
CommandButton1 的Click 下面
Private Sub CommandButton1_Click()
Cells(2, 4).FormulaR1C1 = "=NOW()"
End Sub
CommandButton1 的Click 下面
Private Sub CommandButton1_Click()
Cells(2, 4).FormulaR1C1 = "=NOW()"
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
双击
CommandButton1
按钮,在代码中间粘贴下面的代码:
Cells(2, 4) = Now()
CommandButton1
按钮,在代码中间粘贴下面的代码:
Cells(2, 4) = Now()
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
CommandButton1的代码:
Private Sub CommandButton1_Click()
Sheets("sheet1").Range("D2") = Date & " " & Time
End Sub
Private Sub CommandButton1_Click()
Sheets("sheet1").Range("D2") = Date & " " & Time
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询