请登录查看
保存宏在这章中，你创建的宏WhatsInACell位于一个Excel工作表中。你需要保存这个开启了的工作表来保存这个宏。建议你将其保存为Chap01.xls。保存后，关闭它，然后打开一个新工作表。注意，你工具栏上的自定义按钮还在那儿，正如工具菜单里的Contents of Cells样还在那儿一。在你使用这些工具运行宏之前，请在单元格A1里输入“Addition”，A2里输入数字2，A3里输入数字4，A4里输入“=SUM(A2:A3)”。当你运行这个宏时，Excel会打开适当的工作表并且执行这个指定给自定义工具的过程。打印宏如果你要将你的宏归档起来，或者在你离开电脑的时候研究宏代码，你就需要打印宏。你可以打印你储存宏的整个模块，也可以打印选择的行。打印含有宏的整个模块：1、将光标放在模块的任意地方2、选择“文件”－“打印”3、在打印－VBA对话框，选择“当前模块”4、点击确定打印模块打印选中的文本：1、在模块里，选择你要打印的文本2、选择“文件”－“打印”3、在打印－VBA对话框，选择“选择”4、点击确定打印选中的文本保存宏在个人宏工作簿当你录制宏时，可以将它保存在个人宏工作簿里面。当你储存宏在个人宏工作簿里时，Excel创建一个名为“Personal.xls”的文件并且放在“Program Files\Microsoft Office\Office”的子文件夹——XLStart文件夹里。保存在XLStart文件夹的文件每次在Excel启动的时候都会自动打开。个人宏工作簿是一个保存通用宏代码的方便的地方，就像下面这个宏。现在来录制一个通用的宏“FormulasOnOff”。这个宏的目的是设置是否显示工作簿的公式。1、选择“工具”－“宏”－“录制新宏”2、在录制宏对话框，输入宏名“FormulasOnOff”3、在保存宏的下拉菜单里选择“个人宏工作簿”4、点击快捷键文本框，并且按下“Shift+F”5、选择确定退出录制宏对话框6、按下“Ctrl+~”打开公式的显示，或者选择“工具”－“选项”并且点击“视图”页上“窗口选项”中的“公式”检验盒。当你打开公式显示时，工作簿单元格里显示的是公式，而非这个公式计算出来的数值。如果你是在一个空白工作表中录制这个宏的，那么你将注意到的唯一变化是工作表的列宽。7、点击“停止录制”，或者选择“工具”－“宏”－“停止录制”8、查看代码：按下Alt+F11，或者选择“工具”－“宏”－“VB编辑器”这时，VB编辑器屏幕上的工程窗口里显示了一个多出来的VBA工程（Personal.xls）。点击这个过程名左边的加号来打开这个工程。这个VBA工程包含两个文件夹：Excel对象和模块。点击模块文件夹的加号来打开它，然后双击模块1。这时代码窗口显示了宏FormulasOnOff的内容如下图所示。每个Excel工作表只有一个工程。你第一次录制宏的时候，Excel创建一个模块文件夹，并且将你的代码储存在模块1里面。如果你在相同的工作表里录制另一个宏，Excel将其放在前一个录制的宏的同一个模块1的下面。相同工作时间录制的所有的宏都储存在相同的模块里面。但是，如果你关闭Excel，然后再重新这个工作簿，Excel就会将它储存在一个新的模块。在工程浏览器窗口，你可以选择你需要的工程录制宏的时候，你打开了公式的显示。这个宏的名称表明可以切换公式显示的开和关。你必须修改代码才能确保它按照这种方式运行。录制的宏设置当前窗口显示公式为真：ActiveWindow.DisplayFormulas = True设置为“False”将关闭公式的显示：ActiveWindow.DisplayFormulas = False为了在VBA里设置转换，你需要按照下面的方法来连接两语句：ActiveWindow.DisplayFormulas = Not ActiveWindow.DisplayFormulas用上面的语句代替你录制的代码，并且运行这个宏。无论你运行多少次，这个宏总是知道做什么。你可以使用相同的思路来创建代码以切换格式线或其它Excel特点的显示与否。当你关闭Excel时，它会提示你保存个人宏工作簿的变化，点击确定以保存变化。当你重启Excel，个人宏工作簿会在后台自动开启。如果你想要在个人宏工作簿里保存其它的宏，你可以选择下列方法中的一个：??1、录制一个新宏，并且选择个人宏工作簿来储存2、切换到VB编辑器，打开你要移动到个人宏工作簿里去的宏，剪切这个宏，并且打开个人宏工作簿。将宏粘贴到已经存在的模块中，或者创建一个新模块再粘贴3、选择“文件”－“导入文件”……从另外一个VB工程（*.frm，*.bas，*.cls）导入宏代码?打开含有宏的工作簿无论何时你打开一个含有宏的工作簿，Excel显示一个警告信息，如图1－16。为了避免显示这个警告信息，你可以通过安全对话框关闭病毒保护，如下图所示。当病毒信息出现时，你可以选择：?1、取消宏——当你打开一个来源不熟悉的含有宏的工作簿，例如因特网，电子邮件，为了保护你的电脑不被宏病毒破坏，你应该选择“取消宏”。工作簿打开时不会运行它里面的任何宏。如果没有密码保护的话，你就可以切换到VB编辑窗口查看代码。查看代码后（如果代码安全），你可以关闭该工作簿，然后重新打开它并且启用宏。如果你打开了病毒保护，当工作簿含有宏时，Excel 会弹出一个警告信息2、启用宏——你如果指定这个工作簿来自于一个可靠的来源，也含有有用的宏，点击启用宏按钮。3、更多信息——在你决定取消或者启用宏时，如果你需要了解更多的信息，那么点击这个按钮。Excel2002 有一个有用的功能让你自动取消所有没有签名并且来源不明的宏。选择“工具”－“宏”－“安全”进入这个功能。当你创建一个需要给别人使用的宏时，你可以使用VB编辑器工具菜单里的数字签名来确认这个宏不会带来病毒。宏的数字签名正如在纸上的签名。请在Excel在线帮助里搜索如何安装和创建你自己的数字签名。输入“数字签名”就可以获得相关主题。选择中间的选项，让你根据工作簿决定是否取消或者启用宏VB编辑窗口现在，你已经知道如何录制，运行和修改宏了，让我们花些时间来熟悉VB编辑器的一些特点。使用VB编辑器上的工具，你能够：1、编写你自己的宏过程2、创建自定义窗体3、查看和修改对象属性4、测试VBA过程和定位错误有两种方法进入VB编辑器：?①从Excel界面的工具菜单：选择“工具”－“宏”－“宏编辑器”②从键盘：按下Alt+F11（在工作表标签上单击右键，然后选择查看代码）
意见反馈：
联系方式：
广告等垃圾信息
不友善内容
违反法律法规的内容
不宜公开讨论的政治内容查看: 1480|回复: 3
用宏实现工作表的打印数量
阅读权限20
在线时间 小时
本帖最后由 kokol333 于
23:14 编辑
& && &请教，用宏实现指定工作表名称并打印相应数量，如下图
(12.94 KB, 下载次数: 1)
21:36 上传
21:36 上传
点击文件名下载附件
10.2 KB, 下载次数: 15
阅读权限20
在线时间 小时
没有人知道吗
阅读权限20
在线时间 小时
老师在吗？帮忙解决一下，谢谢
阅读权限20
在线时间 小时
例如： Sheets(&sheet1 &).Select
& &&&ActiveWindow.SelectedSheets.PrintOut Copies:=3, Collate:=True, _
& && && &Sheets(&sheet2 &).Select
& & ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True, _
& && &&&IgnorePrintAreas:=False
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师18207人阅读
项目实战之带你优化（16）
量变与质变的过程（50）
最近在做项目的时候用到了Excel宏和VBA，本着共享的原则，我把收集的资料结合项目实践操作进行了总结之后制作了本教程，旨在帮初学者入门，特别是有一定VB基础的同学，可以通过此教程快速掌握宏和VBA。什么是宏
Excel宏就是一系列的操作步骤，比如在单元格中输入数据，复制A1的数据到B1，对A1:C3求和等等，这些操作步骤有简单有复杂。当某些操作步骤需要不断重复时，我们就要考虑录制宏了。宏的运行原理
电影是用数字记录下来的，Excel中的宏是则是用一种语言保存下来的，这种语言就是VBA语言，这种VB语言可以在Excel中编写一些语句和代码，我们通过执行这些语言和代码可以完成一些特别操作，可以让Excel听我们的指挥，录制宏就是把这些动作用VB语言记录下来，当我们要需要执行这些重复的操作，我们只需要执行这些语言就可以了。宏的制作方法
1.可以通过录制宏，录制的宏实现的操作通常比较简单；
2.通过编写代码，实现比较复杂的重复操作，这个只要你会简单的VB语言就可以了；
3.录制宏和编写代码混合使用；录制宏
录制宏就是把这些动作用VB语言记录下来，当我们要需要执行这写重复的操作，我们只需要执行这些语言就可以了。参考下图：
Excel左下方，有个宏录制按钮，点击该按钮，填写宏名，“确定”；
执行要重复的操作（比如复制A1：A4的数据到D1：D4），完成操作后点击菜单中的“停止录制”或左下角的录制图标，OK，复制宏录制好了。执行宏
执行宏的方法很多，比如使用按钮，绘图工具栏中图片，图形都可以，还可以在菜单中制作一个宏命令按钮。参考下图：
首先调出开发工具菜单：Excel-选项-自定义功能区-开发工具.点击插入-按钮
右击按钮—指定宏，选择需要的宏（复制宏），确定。OK，这时候点击复制按钮，就可以执行复制宏了。
同理，制作图片执行宏，插入-图片，右击图片-指定宏
同理，还可以制作一个宏命令按钮，方法同上。
OK!基础知识就介绍到这里，掌握了这些简单的概念和操作，下一篇博客将通过一个简单的示例来讲解VBA的使用。1个案例教你学会Excel中的VBA1个案例教你学会Excel中的VBAIT微技能加油站百家号可能很多朋友不知道Excel中VBA的用途。那什么是VBA呢？一句话概括：在Excel中想实现什么功能，就可以用VBA语言编写一段程序去完成。今天通过例子带大家了解Excel中的VBA！软件说明：Excel 2010版本场景再现：表格中点击按钮，向单元格E1中输入数字 “233”，并且能够实现清除！第一步、打开编写VBA代码的窗口在Excel表格中编写VBA的窗口叫VBE编辑器，有两种打开的方法。在工作表标签上右键 - 查看代码按Alt+F11第二步、创建写VBA代码的地方有朋友肯定会问：“我没学会编程怎么办？”、“我都没见过代码能行吗？”；别急！我的回复是肯定的！在哪编写代码呢？有好几种方式，今天先学最常用的：“插入” - “模块”。新建一个模块用来存放编写的代码；记住：修改模板的名称：我的VBA模板【如下图虚线标注】第三步、开始写代码新建模板后，在右侧的空白位置就是编写代码的地方。可以执行的VBA代码，结构是这样的：Sub 程序名(参数)可以执行任务的代码End Sub因为例子中我要进行输入与清除的操作，输入Sub 程序名()然后回车，End Sub就会自动输入；如下图：在开始和结束语句之间输入代码，执行在单元格A1中输入数字&233&Range(&E1&) = 123备注：在VBA中，Range(&单元格地址&)来表示单元格。在单元格中输入值，直接用=值 即可(字符串两边要加双引用)，如果清空则 =&&。再编写一段清空代码：第四步、测试运行代码在编写代码时经常要测试是否正确。测试方式是把光标放在代码行的任意位置【下图中“测试按钮”的位置】，点击运行小按钮进行测试；同样清空代码也一样。第五步、点击按钮执行VBA代码在Excel中插入的图形、图片、按钮控件都可以执行VBA代码。让它们执行很简单，点击“插入” - “矩形” - “指定宏”只需要右键菜单中点击指定宏 - 选取编写的宏名称，选择“输入”，添加输入按钮。同样添加清除按钮：当然自己可以调整字体的颜色、字体，让其变得更加美观！此时，通过VBA设置的输入“233”，并可以点击清除！第六步、保存VBA代码此时的VBA代码应该是既有输入代码又有清空代码；最后需要保存为“启用宏的工作簿&类型【注意下图中虚线框标注】，VBA代码才能保存下来。好了！今天的分享就到这里，是不是感觉VBA也没有想象的那么难？赶快转发、关注吧，更多技巧尽在头条号中！本文仅代表作者观点，不代表百度立场。系作者授权百家号发表，未经许可不得转载。IT微技能加油站百家号最近更新：简介:每天分享职场所需办公实用的小技巧！相关文章查看: 547|回复: 3
在 Excel 中编辑宏,怎样实现打印当前工作表
阅读权限20
在线时间 小时
本帖最后由 一成不变变 于
14:50 编辑
在工作簿中有31个工作表，每个工作表中有3页打印内容，“31个工作表&代表每个月的31天，&工作表中有3页打印内容&代表上午、下午、晚上,汇总好后打印出来，要求：超过3页打印内容，弹出消息框（请重新编辑），点按钮，实现只打印活动工作表的第1页或第2页、第3页。请帮忙，谢谢
(24.03 KB, 下载次数: 1)
14:50 上传
点击文件名下载附件
阅读权限30
在线时间 小时
& & & & & & & &
上附件!可以做!
阅读权限20
在线时间 小时
在 Excel 中编辑宏,怎样实现打印当前工作表
aoranbuqun 发表于
上附件!可以做!
在工作簿中有31个工作表，每个工作表中有3页打印内容，“31个工作表&代表每个月的31天，&工作表中有3页打印内容&代表上午、下午、晚上,汇总好后打印出来，要求：超过3页打印内容，弹出消息框（请重新编辑），点按钮，实现只打印活动工作表的第1页或第2页、第3页。请帮忙，谢谢
(24.03 KB, 下载次数: 3)
14:44 上传
点击文件名下载附件
阅读权限30
在线时间 小时
& & & & & & & &
请查看!抛砖引玉...
17:25 上传
点击文件名下载附件
72.37 KB, 下载次数: 11
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师