excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)

  • 系统环境:Windows 10
  • Excel:2010版本

如果你一直想学Excel的VBA,但是苦于没有一个好的老师

Excel本身就提供这样的帮助手段:录制宏

录制宏,将Excel操作直接映射成对应的VBA代码


Part 1:录制宏操作
  1. 打开任一Excel,菜单栏开发工具-点击代码区域录制宏按钮,如图1所示
  2. 或者直接点击左下角录制宏按钮,如图2所示
  3. 打开录制宏后,接下来所有Excel操作,都会有对应的VBA代码在后台生成

excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)(1)

图1 打开录制宏

excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)(2)

图2 打开录制宏

Part 2:录制宏举例:排序
  1. 点击录制宏,开始宏录制,定义宏名,如图3所示
  2. 选择拟排序区域
  3. 菜单栏:开始-编辑块-筛选和排序-升序,如图4和如图5所示
  4. 点击录制宏,结束宏录制
  5. 菜单开发工具-代码块-宏-选择刚创建的宏,点击右侧编辑
  6. 可将该排序代码复制到其它需要使用的地方,根据需要做一些改动

excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)(3)

图3 录制宏名称定义

excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)(4)

图4 排序前

excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)(5)

图5 排序后

Sub 宏1() ' ' 宏1 宏 ' ' Columns("F:F").Select ActiveWorkbook.Worksheets("Sheet2").Sort.SortFields.Clear ActiveWorkbook.Worksheets("Sheet2").Sort.SortFields.Add Key:=Range("F1"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("Sheet2").Sort .SetRange Range("F1:F18") .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End Sub

excel之vba入门与提高(VBA与Excel入门系列-10-VBA自学神器-录制宏)(6)

图6 代码截图

注:录制宏无法实现循环,判断功能,但很多操作代码都是可以参考的


以上,为本次的介绍内容,下回见。

本文首发于Excel高效办公之VBA。排版和细节略作修改,发于头条

,

免责声明:本文仅代表文章作者的个人观点,与本站无关。其原创性、真实性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容文字的真实性、完整性和原创性本站不作任何保证或承诺,请读者仅作参考,并自行核实相关内容。文章投诉邮箱:anhduc.ph@yahoo.com

    分享
    投诉
    首页