如何在excel2007中,双击特定的列的任何一个单元格,自动显示当天日期,并不会改变?

举个例子:例如A列中,双击A9,A9单元格自动显示当天日期如2011/10/18。并且这个单元格在不动它的情况下一直保持2011/10/18。各位高手,麻烦将公式说清楚点... 举个例子:例如A列中,双击A9,A9单元格自动显示当天日期如2011/10/18。并且这个单元格在不动它的情况下一直保持2011/10/18。各位高手,麻烦将公式说清楚点,请描述详细点哦!谢谢了:-)
成功后追加30分~
展开
 我来答
enjoyllonely
2011-10-14 · TA获得超过2.5万个赞
知道大有可为答主
回答量:1.3万
采纳率:60%
帮助的人:7428万
展开全部
你的要求用公式实现不了的。
因为双击要触发事件,必须是vba,
因为日期函数是易失函数,你它保持,必须用vba
因为公式常量不可以同在,所以必须用vba
方法
alt+F11
然后在左边的工程框找到你要实现这个效果的工作表,比如是sheet1表,就双击这个sheet1
然后将下面的代码复制到右边的空白区

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Column = 1 Then Target.Value = Date
End Sub

存盘退出
重新打开文件。打开时,需要你选择“启用宏”
这样你在sheet1表的A列,任一单元格进行双击即可
soup5258
2011-10-14 · TA获得超过9256个赞
知道大有可为答主
回答量:5594
采纳率:74%
帮助的人:2047万
展开全部
这个要代码解决
ATL F11
vb界面-工程窗口中 双击 当前SHEET
弹出窗口中 将下面代码复制进去,

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell.Address = "$A$9" Then
ActiveCell.Value = Date
End If
End Sub

然后双击A9单元格即可得到当日日期
这个是A9双击得到日期,
如果想A列 所有单元格双击都得到当日日期,就将下面代码复制进去,
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If ActiveCell.COLUMN = 1 Then
ActiveCell.Value = Date
End If
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
百度网友e3fe9be
2011-10-14 · TA获得超过1911个赞
知道小有建树答主
回答量:1516
采纳率:0%
帮助的人:1045万
展开全部
不太可能 excel双击单元格的动作默认是编辑单元格,这个没法改...
追问
有没有其他更好的方案?
追答
有种例外 例如你在A1里填上2011-10-14,excel会自动识别为日期,然后选中那个单元格,选中框的右下角不是有个黑点么?,拖动那个黑点向下,excel会自动填充A1下面日期,这个用来做时间表很方便
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
yanxy0924
2011-10-14 · 知道合伙人互联网行家
yanxy0924
知道合伙人互联网行家
采纳数:7683 获赞数:18584

向TA提问 私信TA
展开全部
你说是特定列不点击时是空的,双击之后出现日期吧,好像不太可能,双击是编辑单元格啊。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
论坛砖家
2011-10-14 · TA获得超过676个赞
知道小有建树答主
回答量:647
采纳率:83%
帮助的人:233万
展开全部
你这个问题要请VBA高手编辑宏来解决,我对这个问题也感兴趣。
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(3)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式