有个电子表提示时间,是一件很实用的功能。但是,在网页中显示电子表很正常,只要几行代码就成。但是,如何在Excel中显示会动的电子表呢?请阅读下文!
工具/原料
1
Excel 2007
2
测试文件介绍:新建的Excel表格文档,内有三个表,表名分别是Sheet1,Sheet2,Sheet3.
方法/步骤
1
单击Office按钮,然后选择“Excel选项”:
2
勾选“在功能区显示‘开发工具’选项卡”后,单击“确定”:
3
单击“开发工具”选项卡,然后单击“Visual Basic”:
4
右击Sheet1表,然后选择“插入,模块”:
5
粘贴入以下代码:Sub 电子表()ActiveSheet.Range('A1').Value = TimeApplication.OnTime Time + TimeSerial(0, 0, 1), '电子表'End Sub
6
依次点击“视图,宏,查看宏”,或者直接按Alt+F8快捷键:
7
选择“电子表”后,单击“执行”(直接双击电子表也行):
8
显示效果如下
注意事项
1
如果A1显示为####,表示单元格的列宽太小,需要调整一下。
2
执行宏之后,只会在代码中标注的A1单元格中出现电子表。如果设置到A2处,请将代码中的A1,更换成A2即可。
3
执行宏之后,除非关闭表格并重新打开,电子表会一直更新下去的。
4
打开的每张工作表都会在A1处出现电子表。
下一篇:在EXCEL中下划线的使用技巧