EXCEL单元格自动填入当前日期,并不随系统时间而改变.
例如,做按月做报表保存在一个工作簿里,表头需按月改动《1月营收报表》,一般都在二月初做,1月报表保存了以后,3月初在同工作簿里新建工作表为〈2月营收报表〉,如何设置自动改变,且《1月营收报表》不随时间改变!填表日期也如此!
答案字数较多,建议语音阅读
用宏是可以完成,不过没这个必要吧。 既然每个月都相同,你何不一下把12个月的表都生成呢? 至于一定要设不随时间变化而变化的宏,可把如下代码放入ThisWorkbook:(添加方法可参照我的共享资料,在EXCEL中使用VB编辑器。 Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) y = InputBox("你确定要更改当前日期吗?", "警告", "y") If y = "y" Then x = Month(Now()) Range("a1")。
Value = "《" & x & "月营收报表》" 'A1为表头 Range("b2")。Value = Date 'A2为填表日期 ActiveSheet。Name = x & "月" End If End Sub 原理,在保存之前更改 当前工作表 的日期,不能选中其他工作表保存。
(已加入确认代码,如果你修改了内容不想更改日期则输入y这外的任意值) 如现在3月,选中2月的表保存时,只要输入不为y的值再确定就不会更改日期,默认值为y,直接敲回车将更改填表日期(注意:宏操作具有不可恢复性) 现在的人好象真跟自己过不去一样,弄这么复杂???。
表名:公式:=DATE(YEAR(TODAY()),MONTH(TODAY()),0) 自定义设置:"《"m"营""收""月""报""》" 日期:=DATE(YEAR(TODAY()),MONTH(TODAY()),0) 这个有些创意! 如果需要保存当前月份的数据,以后打开不变。那就在某个位置用ctrl+;输入当前日期,公式引用该日期即可。这个不难实现的。 附件已经修改。
答:文件-页面设置-单击工作表选项卡-单击在打印标题项下的顶端标题行右边的拾取按钮-框选标题行-确定-确定详情>>
问:怎样用Camtasia Studio v2.0.3来制作媒体
答:这个软件有使用向导的,你新建一个文件,然后照着他的说明一步一步的走下去,就知道怎么用了,这个软件太小了,网上跟本找不到教程的,如果你确实还是不会的话,找个懂电脑...详情>>