Excel表自动填写当天日期,隔天也不会自动改变日期,如何设
4个回答
展开全部
1、按ALT+F11进入VBE窗口
2、如果你的表在sheet1中,你就点左边工程管理器里的sheet1(总之你在哪个表中要实现这个功能就点开哪个工作表)。
3、在右边的窗口中输入下边代码:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And Target.Value <> "" Then
Target.Offset(0, -1) = Format(Date, "dd日")
End If
End Sub
4、这样你回到工作表,在B列输入数据。
A列就会出现当前日期。
2、如果你的表在sheet1中,你就点左边工程管理器里的sheet1(总之你在哪个表中要实现这个功能就点开哪个工作表)。
3、在右边的窗口中输入下边代码:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 2 And Target.Value <> "" Then
Target.Offset(0, -1) = Format(Date, "dd日")
End If
End Sub
4、这样你回到工作表,在B列输入数据。
A列就会出现当前日期。
追问
你好,谢谢你你帮忙。我想问如果C1填入内容,F1就自动填写日期,正确要怎样设置
展开全部
总结下,常用的三种方案:
一,使用函数如 today()不能实现不变的日期。
二、VBA,你会的话,就不来这里问了。不过你照抄上边的也行,需要灵活运用,自己修改下。
三、用快捷键输入,ctrl+;
一,使用函数如 today()不能实现不变的日期。
二、VBA,你会的话,就不来这里问了。不过你照抄上边的也行,需要灵活运用,自己修改下。
三、用快捷键输入,ctrl+;
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
在单元格里输入=today()。得出当前日期后。复制-选择性粘贴-值和数字格式。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不改变原始表格数据,打印时自动添加打印日期。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询