加载中…
个人资料
  • 博客等级:
  • 博客积分:
  • 博客访问:
  • 关注人气:
  • 获赠金笔:0支
  • 赠出金笔:0支
  • 荣誉徽章:
正文 字体大小:

怎样让宏自动运行

(2013-02-11 09:07:46)
分类: 薄表文档

点击…>3,就可以进入:江海明子的博文3

点击…>1…>2就可以进入江海明子的博文1江海明子的博文2

点击页面上的:江海明子的博客http://blog.sina.com.cn/jshmxyming

就可以进入我的博客首页.

百度中搜索“江海明子的博客”,就能搜索到“江海明子_新浪博客

百度中搜索:怎样让宏自动运行

就能搜索到:怎样让宏自动运行_江海明子_新浪博客 

 

一、为什么在excel中没有自动运行宏的设置?

微软可能是从防病毒的角度考虑,没有这项设置。

二、宏的建立:

新建或打开excel薄,

1、录制新宏:

<1、快捷键:在工作薄中,Alt+TM,R

<2、菜单法:在工作薄中,工具-宏-录制新宏(输入宏名和快捷键的字母<如:h>,以后需要运行宏时,只要用快捷键即可)-确定(接下来就像平时一样操作一下就行,最后只要别忘记结束录制就是了)。

2、建立新宏:

<1、快捷键:在工作薄中,Alt+F11

<2、菜单法:在工作薄中,工具-宏-Visual Basic编辑器。

3、宏的形式:

在方法2后,会弹出一个“工程-VBAProject”对话框,

<1、双击“Sheet1(Sheet1)”,会弹出一个“Sheet1(代码)”输入框,在框内输入代码就行,如:

Sub 秒表()
ActiveSheet.Range("
B4").Value = Time
Application.OnTime Time + TimeSerial(0, 0, 1), "sheet1.
秒表", , True
End Sub

<2、在“Sheet1(Sheet1)”上右击,“插入-模块”,或用快捷键:Alt+IM,会弹出一个“模块X(代码)输入框,在框内输入代码就行

代码输入完后,只要回到工作薄运行宏就可以啦。 

4让宏随工作薄的打开而自动运行:

在有的时候需要在打开工作薄时运行宏,如:在excel中的倒计时牌(制作方法:http://blog.sina.com.cn/s/blog_48462a890102e4u5.html )、在excel中的电子钟(制作方法:http://blog.sina.com.cn/s/blog_48462a890102e4vb.html )等

在“工程-VBAProject”的窗口中, 双击“ThWokbook”,在“ThWokbook(代码)”窗口中,输入如下代码:

Private Sub Workbook_Open()

Sheet1.秒表

End Sub

(代码中红色部分是您先前建立的宏名<在宏代码的倒数第二行的双引号中>

当然在关闭前要先运行一下所有的宏

 怎样让宏自动运行

0

阅读 收藏 喜欢 打印举报/Report
  

新浪BLOG意见反馈留言板 欢迎批评指正

新浪简介 | About Sina | 广告服务 | 联系我们 | 招聘信息 | 网站律师 | SINA English | 产品答疑

新浪公司 版权所有