设为主页
加入收藏
联系我们
返回首页
 
   
硬件故障 系统故障 软件学习
 
   
  您现在的位置>>首页>>软件学习>> 让工作充满乐趣:Word的另类用法  
 
     
 

 

让工作充满乐趣:Word的另类用法

文章来源:网络


     你是不是整天面对着电脑而感到头昏脑涨,但无穷无尽的工作却让你得不到外出休息的机会,哪怕只有十几分钟的时间。其实,我们在工作中也可以自我放松一下的。

 一、别孤独,我来陪你

   把你最亲近的人的照片扫描好后保存为 JPG 格式,打开 Word 2003 ,在 “ 插入 → 图片 → 来自文件 ” 把保存好的图片插入到 Word 文档中,然后选择 “ 工具 → 自动更正选项 ” ,在 “ 替换 ” 中输入她的名字,如 “ 安琪 ” ,单击 “ 确定 ” 按钮后退出(如图 1 )。以后,只要你在输入 “ 安琪 ” 时,她的照片就会出现在你的面前,有她伴着你办公,这回不就孤独了吧。

图 1

  如果有多张图片,可以一次插入到 Word 2003 中,然后全部选中后进行自动更正,则出现的就是她的一组照片。

   二、自动提醒

   会不会因为工作忙而忘了女朋友的生日?不要紧,我保证你到时会记得,这只要一个宏就可以实现。

   按下 “Alt+F 8” 组合键,在弹出的 “ 宏 ” 对话框中的 “ 宏名 ” 处输入宏的名称,如 SR ,单击 “ 创建 ” 。在弹出的 Visual Basic 编辑器中的代码 “Sub SR ()” 与 “End Sub” 之间输入以下内容(如图 2 ):

图 2

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 日 ,就会弹出对话框来询问使用者的小名,如果你回答不正确,则会弹出 “ 你是谁?到办公室呆着去 ……” ,只有输入 “ 安安 ” 后才会出现预定的内容。

Cico 提示:应用上面介绍的这种方式,我们还可以将其设置为公告,备忘录等。

 

上一篇: 无
下一篇: 完


【本站声明】本站刊载的部分内容全部来源互联网,对于此类文章本站仅提供交流平台,不为其版权负责。如涉及侵犯您的知识产权的文章,请联系我们,我们将尽快做出更正。并向您表示感谢!同时特别感谢对本站所有支持的网友。

 
 
综合搜索 百度 google 爱问 搜狗 中搜 雅虎 MP3 图片 flash 视频
您好!中国好用是残疾人创办站,欢迎你设为首页,你每一次的使用,就是一份爱心,对我们来说就是一份希望......