GETPIVOTATA 函数字段为日期可否为对应所有选定单元格加字段

来源：蜘蛛抓取(WebSpider) 时间：2017-10-17 02:17 标签： 筛选单元格 字段
Excel问伊答之7：随着单元格内容的修改，对应单元格里的日期或时间值自动记录并固定
我的图书馆
Excel问伊答之7：随着单元格内容的修改，对应单元格里的日期或时间值自动记录并固定
当然此问题用日期函数DATE或者NOW来解决就不行了，因为DATE函数或NOW函数都会随着电脑的系统日期和时间而发生变化。若要想固定住每次修改内容的日期值或时间值，只能用vba代码是高效的方法。具体如下照着操作吧： ***友情提醒***：<span style='color:#-如果你没看过历史教程或资料，请点击微信右上角“人形”的图标，进入后点击【查看历史消息】菜单即可查看。*<span style='color:#-如果你觉得内容不错，希望大家一起练习并分享一下，可在新浪微博上发布你的作品并@ExcelPPT李则见 ，好东西要大家一起分享转发。*<span style='color:#-如果你愿意分享给其他朋友，可在当前教程微信的右上角点击“三个点”图标分享给你的好友<span style='color:#-可以发送你自己的表格案例或PPT案例给我们，通过我这个微信公共平台来分享你的技巧和作品，让更多的朋友们认识你。我的邮箱是： &，欢迎你随时分享、探讨Excel 或PPT方面的技巧或问题。 <span style='color:#-也可以关注我们的Excel和PPT学习会QQ群：
比如我们想每当在此表的数量列输入数字或更改数字时候，对应的日期列的日期就自动出现或更改为当前系统日期（时间）。 姓名城市数量日期lgc上海10xxs苏州11ccd武汉12dad成都15xfwe广州11 1，鼠标右击当前该工作表标签，选择查看代码 2，复制下面的代码到光标处 Private Sub Worksheet_Change(ByVal Target As Range)'当被修改的单元格只有一个，且列号等于3，行号大于2时执行程序 & &If Target.Count = 1 And Target.Column = 3 And Target.Row &= 2 Then & & & &Target.Offset(0, 1) = Date & &'被修改的单元格的右面一个单元格的值为当前日期 & &End IfEnd Sub
或者这段代码也成，基本一样，就是一个是用Date函数，一个用了NOW函数而已。 Private Sub Worksheet_Change(ByVal Target As Range)'当被修改的单元格只有一个，且列号等于3，行号大于2时执行程序 & &If Target.Count = 1 And Target.Column = 3 And Target.Row &= 2 Then & & & &Target.Offset(0, 1) .VALUE= NOW & &'被修改的单元格的右面一个单元格的值为当前日期 & &End IfEnd Sub
3，关闭VBE窗口4，以后只要你每在当前这个工作表的第3列第2行起的每个单元格里录入或修改内容，系统将自动记录日期或时间并固定下来不变化，直到下次你再次录入或修改第3列的内容。
TA的最新馆藏
喜欢该文的人也喜欢透视表函数-GETPIVOTDATA_百度文库
两大类热门资源免费畅读
续费一年阅读会员，立省24元！
透视表函数-GETPIVOTDATA
阅读已结束，下载文档到电脑
想免费下载本文？
定制HR最喜欢的简历
下载文档到电脑，方便使用
还剩8页未读，继续阅读
定制HR最喜欢的简历
你可能喜欢

我要回帖

更多关于 筛选单元格 字段 的文章

 

随机推荐