多语言展示
当前在线:834今日阅读:163今日分享:20

Excel中创建真实电子表

有个电子表提示时间,是一件很实用的功能。但是,在​网页中显示电子表很正常,只要几行代码就成。但是,如何在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处出现电子表。

推荐信息