在EXCEL中,如果某一列的任何一个单元格的内容发生变化,则在固定的单元格内自动显示当前的年月日。
在EXCEL中,如果某一列的任何一个单元格的内容发生变化,则在固定的单元格内自动显示当前的年月日。求大神帮忙!例如A列的A6单元格内容发生变化,那么在特定的单元格如B3自...
在EXCEL中,如果某一列的任何一个单元格的内容发生变化,则在固定的单元格内自动显示当前的年月日。求大神帮忙!例如A列的A6单元格内容发生变化,那么在特定的单元格如B3自动显示当前的年月日,如果这一列的内容没有发生变化,则显示时间不变化?求详细代码!
展开
展开全部
vba代码如下(注意:这是事件代码,放在thisworkbook对象下)
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'当sheet1表的A列改变时,在B3单元格内显示当前日期
Dim strSpecialCol$, strCourCol$
strSpecialCol = "A"
strCourCol = Replace(Replace(Cells(1, Target.Column).Address, "$", ""), "1", "")
If LCase(Sh.Name) = "sheet1" And strSpecialCol = strCourCol Then
[B3] = Date
End If
End Sub
Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
'当sheet1表的A列改变时,在B3单元格内显示当前日期
Dim strSpecialCol$, strCourCol$
strSpecialCol = "A"
strCourCol = Replace(Replace(Cells(1, Target.Column).Address, "$", ""), "1", "")
If LCase(Sh.Name) = "sheet1" And strSpecialCol = strCourCol Then
[B3] = Date
End If
End Sub
展开全部
这个只能用VBA的
给你个例子吧,注意需要在Workbook Open、Sheet selectionchange 、Sheet Change三处使用代码
更多追问追答
追问
求代码
追答
WorkBook 通用,定义一个全局变量以便记录所选单元格的旧值,Open时先记录当前单元格(一般是A1)的值
Sheet SelectChange 记录下所选单元格的旧值(如果是A列的话)
Sheet Change,比较新值和旧值,如果不同,赋值B3当前时间(如果是A列)并把新值赋给vOld.q请上电脑下载附件吧,反正你是提问者,下载不需要财富值
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
设置B3的函数即可
追问
求详细代码!听说要使用宏
追答
具体我忘了,就在设置函数那里,调用函数
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询