word倒计时怎么设置

word倒计时怎么设置,第1张

首先,打开Excel2010工作簿,在A1处输入标题日期,在A2输入本日日期,然后向下填充至春节的日期。

请点击输斗雀入图片描述

接下来在B1输入标题日,在B2输入获取日号并转为文本的公式=TEXT(A2,"dd日"),并向下填充。

请点击输入图片描述

在C1输入标题月,亮大在C2输入获取月份并转为文本的公式=TEXT(A2,"mm月"),并向下填充。

请点击输入图片描述

在D1输入标题星期,在D2输入获取星期并转为文本的公式=TEXT(A2,"[DBNum1]aaaa"),并向下填充。

请点击输入图片描述

在E1输入标题倒计时,在E2输入计算所剩天数的公式="2018/2/16"-A2,得出来的结果是个日期,要在开始选项卡数字功能区设置下格式为常规,再向下填充。保存工作簿关闭待用。

请点击输入图片描述

接下来打开Word2010,输入好其他衬托文字。然后点击邮件选项卡,再点击功能区中的选择收件人,点选使用现有列表。

请点击输入图片描述

找到上面保存好的Excel工作簿打开,点选数据所在的工作表标签名,确定。

请点击输入图片描述

然后光标定位在要放置倒计时天数的位置,点击邮件选项卡,在编写和插入域中点击插入合并域旁的小三角,选择倒计时。

请点击输入图片描述

同上面一样定位好光标,再插入月,日,星期。再点击功能区的完空键早成并合并。

请点击输入图片描述

点选编辑单个文档,按确定就制作出了每一页的倒计时,再打印出来装订好就可以了。

请点击输入图片描述

在Word中制作倒计时钟,主要利用VBA所提供的定时器功能。下面以2010年元旦为粗兆例。

步骤如下:

1、打开Word,新建一个空白文档,设置好字体、字形、字号等格式;

2、按隐纯下“Alt+F11”组合键,进入VBA编辑器;

3、按下“Ctrl+R”组合键,d出工程资源管理器窗口,双击“Project”下的“ThisDocument”,打开代码窗口,输入以下灶凳咐代码:

Sub Timer()

ss=DateDiff(“s”, Now, “2010-12-31 24:00:00”)

If ss>=0 Then

Dd=ss\86400

ss=ss-dd*86400

hh=ss\3600

ss=ss-hh*3600

mm=ss\60

ss=ss-mm*60

Selection.HomeKey Unit:=wdstory

Selection.EndKey Unit:=wdstory,Extend:=wdExtend

Selection.Text=“距离2010年元旦还有” &vbCrLf &dd &“天”&hh &“小时”&mm &“分钟”&ss &“秒”

Selection.Collapse Direction:=wdCollapseEnd

Application.OnTime Now+TimeValue(“00:00:01”), “Timer”

End If

End Sub

4、按下“Alt+F8”组合键,打开“宏”,选中“Timer”,单击“运行”按钮返回,文档中即可出现一个倒计时钟了


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11986038.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-20
下一篇 2023-05-20

发表评论

登录后才能评论

评论列表(0条)

保存