用Excel制作的电子表

 时间:2024-10-15 15:37:47

1、第一步,获取系统日期与时间。

2、先在A1单元格中输入一个公式 =now() ,用于调取系统的日期和时间。

3、第二步,设置单元格格式

4、然后选中A1单元格,按“格式-单元格”,在出现的“数字”选项卡中,选左边“自定凶及淄靥义”,再在右边“类型”框中输入下面格式:

5、yyyy-mm-dd hh:mm:ss

用Excel制作的电子表

7、这样做是为了显示的数字美观。你也可以在此步中,设置其他样式的格式。

8、第三步,插入文本框。

9、为了给电子表做一个面板,需要插入一个文本框。选按“视图-工具”,调出“绘图”工具栏,在其中选中“文本框”,然后用鼠标在屏幕上画一个大小适合的文本框。

用Excel制作的电子表

11、选中这个画好的文本框,在上面的编辑栏中输入公式 =A1 ,使它能显示A1单元格中的内容。再设置一下“居中”显示,以便让数字显示在文本框的中间。

用Excel制作的电子表

13、第四步,设置文本框格式

14、用鼠标点击文本框的边框(注意,不要点文本框中间),右键,选“设置文本框格式”,然后按下图设置。

用Excel制作的电子表用Excel制作的电子表

17、第五步,加入自动计时代码。

18、这样做好后,电子表的喋碾翡疼模样就出来了,但时间是静止的,不能自动更新。这就需要加入一个VBA宏,使时间每秒钟更新一次。

19、按ALT+F11调出VBA窗口,插入一个模块,把下面两段代码复制进去。

20、Dim n

21、Sub 计时()

22、Application.Calculate '重算工作表

23、n = Now + TimeValue("00:00:01") '设定时间间隔为一秒

24、Application.OnTime n, "计时" '到指定时间后再执行本过程

25、End Sub

26、Sub 停止()

27、On Error Resume Next

28、Application.OnTime n, "计时", , False

29、End Sub

30、第六步,添加按钮。

31、在电子表的下面插入两个“艺术字”做的按钮,一个为“计时”,一个为“停止”。

32、用鼠标右健选中“计时”按钮,指定一个宏,在出现的宏对话框中选“计时”宏,确定。

用Excel制作的电子表

34、用鼠标右健选中“停止”按钮,指定一个宏,在出现的宏对话框中选“停止”宏,确定。

35、现在就可以使用了,按一下“计时”按钮,电子表开始工作,按“停止”按钮,电子表停止计时。

用Excel制作的电子表

37、这个计时宏还可加工一下,用在其他方面,比如让表格的颜色每隔一段时间自动改变、自动修改单元格内容等等,有兴趣的朋友可以试一下。

38、注意事项

39、注意:如果按“计时”后,电子表不工作,需要按“工具-宏-安全性”,把安全级别设置为“中”,然后重新打开“电子表”工作簿,会提示是否启用宏,因为这个文件中的宏是自己添加的,是安全的,可选择“启用宏”。

40、只要工作簿中包含宏,打开时就会提示是否启用宏,如果是不熟悉的文件,或从网上下载的文件,无法确定是否安全,请选择“禁用宏”。

  • Excel如何制作表格?
  • 如何制作Excel表格
  • 初学者:EXCEL制作表格、打印表格基本操作步骤
  • 如何制作电子表格
  • 怎么用excel制作表格?
  • 热门搜索
    苦丁茶有什么功效 摆地摊卖什么利润大 萝莉什么意思 什么是月食 离婚的主要起因是什么 什么是三从四德 guest是什么意思 什么是红歌 党的先进性是什么 运动员