打开APP
userphoto
未登录

开通VIP,畅享免费电子书等14项超值服

开通VIP
Excel新创建宏5录制宏编辑
userphoto

2023.02.15 浙江

关注

【5】Excel录制宏代码简化     

1/EXCEL VBA录制宏与手工代码简化使程序实现最佳运行效率 干就完了/今日头条极速版

【4】excel创建宏个人宏工作薄xlsb录制宏   

1)Excel2016中如何设置宏,已发新浪博客!

https://jingyan.baidu.com/article/d7130635d6065213fdf47580.html

1.1)文件-选项/信任中心(进入.信任中心设置)/

  选择“宏设置”,“启用所有宏”,并选择“信任对VBA……”选项。

   以上步骤,实际操作中似不需要?当时录制时是启用了(1.1)

1.2)/启动excel进入编辑界面,

·选.开发工具/录制宏(或者,视图-宏-录制宏),进入宏录制步骤

·输入要录制的:

   宏名称:税金宏1 (按图中所示设置宏的适用范围)/;

   快捷键(K):ctrl+m,也可不用快捷键,即在此处不输入m。而是设置其他的快捷图标等;

保存在(I):个人宏工作薄;

确定。

·开始录制,按正常的excel操作步骤进行输入操作,直至完成,

  选.开发工具/停止录制宏。

·点击文件/另保存为,必须另保存为“.xlsm”格式(表示该文件含有宏代码)。只有这样,才能在下次启动任何excel时,此宏都将是可用的。

c)需要运行该宏时,按Alt+F8(或选.视图-宏-查看宏,或开发工具/宏),找到要用的宏,选“执行”即可。

2)EXCEL录制好的宏应该保存在哪里

https://www.sohu.com/a/120251990_225602

 一般把用Excel录制的动作序列称做“宏”,手动编写的控制Excel的代码称做VBA。

  一般不需要录制“选择”单元格的动作,否则每当执行宏的时候,鼠标光标都会回到最初选择的那个单元格开始执行,这往往是我们不需要的。

 首先选择一个需要设置格式的单元格区域,单击“开发工具→代码→录制宏”命令,开始录制我们的Excel操作。如果在Excel界面中没有找到“开发工具”标签,则需要选择“Excel文件→选项/对话框中选择左侧的自定义功能区”选项,对话框右侧的“自定义功能区”下拉框中选择“主选项卡”,在“主选项卡”下方的列表中勾选“开发工具”复选框即可。Excel即将录制的宏保存在哪里。这里有三个选项:

 (1)个人宏工作簿

 如把录制的宏保存在“个人宏工作簿”中,那么该宏在所有本机上打开的Excel文件中都能使用,“个人宏工作簿”在正常情况下是隐藏的,并随着Excel的启动而开启。

 如果想在本机上其它EXCEL中使用此宏,需要保存到个个宏工作簿中

 (2)新工作簿

如果把录制的宏保存在“新工作簿”中,那么录制的宏会保存在一个新建的工作簿中,当前工作簿并不保存录制宏所自动生成的VBA代码。

(3)当前工作簿

如果选择把即将录制的宏保存在“当前工作簿”中,那么录制宏所自动生成的VBA代码将保存在当前工作簿文件中,可以随着当前文件分发给其他用户。

注意:如果选择了“当前工作簿”这个选项的话,保存当前文件时,必须保存为“.xlsm”格式(表示该文件含有宏代码)。

【3】excel创建宏,新建宏:Alt+F11    

czm)创建新宏/Alt+F11/启动宏编辑器/

 1)视图/代码/插入代码编辑窗口/创建的宏在Excel对象/sheet1(sheet1);

  2)插入/模块/创建的宏在模块下的各模块(模块1、2...)中;

-------------------

2)三、将Excel图表完美转换为GIF文件

 有时要在网页中插入一个图表,或在其它非Office程序中用到图表,可通过把工作表存为一个HTML文件来实现,在另存为网页时,Excel会自动将图表转换为GIF文件。也可用Office自带的VBA编辑器来编写一个简单的宏来完成这个工作。

 2.创建宏

  按快捷键Alt+F11键,打开Visual Basic编辑器。在"工程"窗口中选中图表所在的工作簿,然后执行菜单命令"插入>模块",打开"模块1"窗口,在窗口中输入以下四行代码,如图3所示。

  Sub SaveChartAsGIF ()

  Fname = ThisWorkbook.Path & "\" & ActiveChart.Name & ".gif"

  ActiveChart.Export FileName:=Fname, FilterName:="GIF"

End Sub

图3

  代码输入完成后,不要忘记存盘。存盘后关闭Visual Basic编辑器。

  3.执行宏

回到Excel窗口,将工作簿保存到某一文件夹中,选中图表,然后按快捷键Alt+F8键,打开"宏"对话框。选中"SaveChartAsGIF"宏,并单击"执行"按钮,如图4所示

 。

图4

  运行宏之后所生成的GIF文件会以图表的名称来命名,并被保存到该工作簿所在的文件夹,打开该文件夹,就可以看到生成的GIF文件,使用任一图象浏览软件即可浏览该文件,在其它程序当中可以很方便地插入这个GIF文件。

  注意:由于这个简单的宏没有错误检查机制,所以如果在执行宏之前没有选中图表或者工作簿未存盘,都会出现错误提示。

1)excel里如何创建宏

http://zhidao.baidu.com/link?url=XXDF3_uualOI0SanTjZnmj3S1l92jA3--A_3LpGquxvRnNrQB8xwiOy02Vd0_Zdd2-J9ynBK65gC1YaOr5y2z_

按下ALT+F11,菜单/视图/代码窗口/:插入-模块,复制下列代码,退出. 

  选定你的列.然后工具-宏-宏.选MACRO1(),运行. 

  举例子说明一下:

  创建一个功能为将选定列的宽度设为20,再加上一个快捷键Ctrl+Shift+F?

  按下ALT+F11,菜单:插入-模块,复制下列代码,退出. 

  选定你的列.然后工具-宏-宏.选MACRO1(),运行. 

  Sub Macro1() 

  Selection.ColumnWidth = 20 

  End Sub 

  工具-宏-宏.选中MACRO1(),点选项,在框中输入F

【2】创建宏按钮录制宏编辑宏快捷键VBA编辑

1/EXCEL VBA录制宏与手工代码简化使程序实现最佳运行效率 干就完了/今日头条极速版

4/EXCEL调用(执行)VBA代码(过程或宏)教程

http://www.360kuai.com/pc/92567be547d1d4bf5?cota=4&tj_url=xz&sign=360_57c3bbd1&refer_scene=so_1

 创建:button控件(按钮)

3)学习Excel VBA有什么用处?

1.创建宏按钮,打开宏快捷键Alt+F8(执行宏)

Alt+F11:进入VBA编辑器

开发工具/宏/

视图/宏/

2.设置按钮

2.1.开发工具/插入/按钮/回到工作表中,鼠标变成+,按住右键拖拉出按钮。

2.1.1)excel如何添加开发工具选项卡

http://jingyan.baidu.com/article/5d6edee22f3f8599eadeec32.html

文件/选项/自定义功能区/右边列.勾选开发工具/确定

2.2.右击按钮,可移动位置,

 于按钮中心处,右击按钮(或多次),可设置字体及其颜色等。

2.3 调整如字体、颜色、形状等如何实现?

 右击按钮/属性选项,点击后会出现如下图所示的属性对话框1:

 字体是Font,按钮背景颜色是Backcolor,按钮文字颜色是Forecolor,按钮显示名称是Caption,用于区分的按钮名字是(Name)。还有其他好多设置,高度、宽度、下沉、上浮等。

2.3.VBA excel按钮颜色

 在工具栏上右键,显示控件工具箱,点左上角进入设计模式,点第二个按钮“属性”,打开属性窗口,设置“forecolor”或“backcolor”即可

2.4.字体和颜色可以调整,按钮形状就没办法了。

 窗体控件:右键按钮-编辑文字-选中要修改的字,直接在菜单栏对应项修改。跟你修改单元格一样。

 控件工具箱:双击按钮,进入编辑器界面,左边属性列表中找到按钮,然后找到Font,forecolor 等属性进行修改。

3)如何将EXCEL工作簿中所有工作表一次性运行同一个宏

https://zhidao.baidu.com/question/560804201.html?qbl=relate_question_0&word=%C8%E7%BA%CE%D6%C6%D7%F7%D2%BB%B8%F6%BA%EA%D3%A6%D3%C3%D3%DA%CB%F9%D3%D0excel

 一种办法:选中所有表格,再录制宏。

 另一种办法:最简单的办法是用VBA修改宏,枚举每一张表,执行相同的操作步骤。

 追加的代码如下:

Sub test()

n = Worksheets.Count

For i = 1 To n

  Worksheets(i).Activate

  Macro1

Next

End Sub

 注:上面所写到所有Macro1,请修改为你的宏名称。

 见例图:Macro1宏

注:

上面部分为:Macro1宏

 sub Macro1 ()

  range("A2:B2").select

  selection.copy

  range("A4").select

  activeSheet.paste

end sub 

下面部分为:test宏

 Sub test()

n = Worksheets.Count

For i = 1 To n

  Worksheets(i).Activate

  Macro1

Next

End Sub

重新打开宏对话框,会多出一个test项,执行这个宏就可对所有工作表执行宏micro1了。

本站仅提供存储服务,所有内容均由用户发布,如发现有害或侵权内容,请点击举报
打开APP,阅读全文并永久保存 查看更多类似文章
猜你喜欢
类似文章
【热】打开小程序,算一算2024你的财运
Excel限制点击关闭按钮,只能点击表格内的按钮关闭 VBA技巧
一键合体,将多个Excel文件合并为一个文件
运行VBA代码的四种常用方法
VBA 代码的正常执行,需要注意这几点(别怕VBA)
[原创]学会VBA,早点把家回(分享1)
《神奇的VBA》一款Excel VBA编程学习插件
更多类似文章 >>
生活服务
热点新闻
分享 收藏 导长图 关注 下载文章
绑定账号成功
后续可登录账号畅享VIP特权!
如果VIP功能使用有故障,
可点击这里联系客服!

联系客服