让工作充满乐趣:Word的另类用法
时间:2005-11-24 | 作者:中国电脑教育报 | 阅读:173
你是不是整天面对着电脑而感到头昏脑涨,但无穷无尽的工作却让你得不到外出休息的机会,哪怕只有十几分钟的时间。其实,我们在工作中也可以自我放松一下的。
一、别孤独,我来陪你
把你最亲近的人的照片扫描好后保存为JPG格式,打开Word 2003,在“插入→图片→来自文件”把保存好的图片插入到Word文档中,然后选择“工具→自动更正选项”,在“替换”中输入她的名字,如“安琪”,单击“确定”按钮后退出(如图1)。以后,只要你在输入“安琪”时,她的照片就会出现在你的面前,有她伴着你办公,这回不就孤独了吧。

如果有多张图片,可以一次插入到Word 2003中,然后全部选中后进行自动更正,则出现的就是她的一组照片。
二、自动提醒
会不会因为工作忙而忘了女朋友的生日?不要紧,我保证你到时会记得,这只要一个宏就可以实现。
按下“Alt+F8”组合键,在弹出的“宏”对话框中的“宏名”处输入宏的名称,如SR,单击“创建”。在弹出的Visual Basic编辑器中的代码“Sub SR ()”与“End Sub”之间输入以下内容:

Sub Autoexec ()
If Month(Now()) = 3 And Day(Now()) = 4 Then
Nam$ = InputBox$("亲爱的,告诉我你的小名,我有东西给你")
If Nam$ = "安安" Then
MsgBox "今天是Amdel的生日"
MsgBox "现在你应该给她发邮件,告诉她几点钟下班"
MsgBox "今天要买九十九支玫瑰给她"
MsgBox "对她说,你是我的最爱,但除了电脑"
MsgBox "对她说,我会一生一世地爱你"
Else
MsgBox "你是谁?到办公室呆着去。或者,丢开你的电脑,到外面玩一下再回来"
End If
End If
上述代码说明这是一个自动运行的宏,可以在Word 2003启动时自动运行,若系统日期为3月4日,就会弹出对话框来询问使用者的小名,如果你回答不正确,则会弹出“你是谁?到办公室呆着去……”,只有输入“安安”后才会出现预定的内容。
提示:应用上面介绍的这种方式,我们还可以将其设置为公告,备忘录等。
一、别孤独,我来陪你
把你最亲近的人的照片扫描好后保存为JPG格式,打开Word 2003,在“插入→图片→来自文件”把保存好的图片插入到Word文档中,然后选择“工具→自动更正选项”,在“替换”中输入她的名字,如“安琪”,单击“确定”按钮后退出(如图1)。以后,只要你在输入“安琪”时,她的照片就会出现在你的面前,有她伴着你办公,这回不就孤独了吧。

如果有多张图片,可以一次插入到Word 2003中,然后全部选中后进行自动更正,则出现的就是她的一组照片。
二、自动提醒
会不会因为工作忙而忘了女朋友的生日?不要紧,我保证你到时会记得,这只要一个宏就可以实现。
按下“Alt+F8”组合键,在弹出的“宏”对话框中的“宏名”处输入宏的名称,如SR,单击“创建”。在弹出的Visual Basic编辑器中的代码“Sub SR ()”与“End Sub”之间输入以下内容:

Sub Autoexec ()
If Month(Now()) = 3 And Day(Now()) = 4 Then
Nam$ = InputBox$("亲爱的,告诉我你的小名,我有东西给你")
If Nam$ = "安安" Then
MsgBox "今天是Amdel的生日"
MsgBox "现在你应该给她发邮件,告诉她几点钟下班"
MsgBox "今天要买九十九支玫瑰给她"
MsgBox "对她说,你是我的最爱,但除了电脑"
MsgBox "对她说,我会一生一世地爱你"
Else
MsgBox "你是谁?到办公室呆着去。或者,丢开你的电脑,到外面玩一下再回来"
End If
End If
上述代码说明这是一个自动运行的宏,可以在Word 2003启动时自动运行,若系统日期为3月4日,就会弹出对话框来询问使用者的小名,如果你回答不正确,则会弹出“你是谁?到办公室呆着去……”,只有输入“安安”后才会出现预定的内容。
提示:应用上面介绍的这种方式,我们还可以将其设置为公告,备忘录等。
福利游戏
相关文章
更多-
- word制表位详细使用步骤
- 时间:2024-10-02
-
- word给图片添加马赛克气泡效果详细操作步骤
- 时间:2024-10-02
-
- word文档权限详细设置步骤
- 时间:2024-10-02
-
- word标尺详细使用步骤
- 时间:2024-10-02
-
- word调整行间距详细操作教程
- 时间:2024-10-02
-
- word深灰色的Office主题具体设置教程
- 时间:2024-10-02
-
- word书本目录具体制作教程
- 时间:2024-10-02
-
- wps电子版手写签名怎么弄
- 时间:2024-02-02
精选合集
更多大家都在玩
热门话题
大家都在看
更多-
- 浪漫餐厅兑换码2.20
- 时间:2025-02-21
-
- 形容读书多学问高的成语是什么 蚂蚁庄园2月20日答案最新
- 时间:2025-02-21
-
- 巨螯蟹属现存唯一的品种是什么 神奇海洋2月19日答案最新
- 时间:2025-02-21
-
- 古钱币文创师的主要工作是仿制古钱币吗 蚂蚁新村2月19日答案
- 时间:2025-02-21
-
- 古钱币文创师的主要工作是什么 蚂蚁新村2月19日答案最新
- 时间:2025-02-21
-
- 支付宝蚂蚁森林神奇海洋2月19日答案
- 时间:2025-02-21
-
- 古钱币文创师的主要工作是仿制古钱币吗
- 时间:2025-02-21
-
- 学富五车和蝉不知雪哪个常用来形容读书多学问高
- 时间:2025-02-21