- 系統環境:Windows 10
- Excel:2010版本
如果你一直想學Excel的VBA,但是苦于沒有一個好的老師
Excel本身就提供這樣的幫助手段:錄制宏
錄制宏,将Excel操作直接映射成對應的VBA代碼
Part 1:錄制宏操作
- 打開任一Excel,菜單欄開發工具-點擊代碼區域錄制宏按鈕,如圖1所示
- 或者直接點擊左下角錄制宏按鈕,如圖2所示
- 打開錄制宏後,接下來所有Excel操作,都會有對應的VBA代碼在後台生成
圖1 打開錄制宏
圖2 打開錄制宏
Part 2:錄制宏舉例:排序- 點擊錄制宏,開始宏錄制,定義宏名,如圖3所示
- 選擇拟排序區域
- 菜單欄:開始-編輯塊-篩選和排序-升序,如圖4和如圖5所示
- 點擊錄制宏,結束宏錄制
- 菜單開發工具-代碼塊-宏-選擇剛創建的宏,點擊右側編輯
- 可将該排序代碼複制到其它需要使用的地方,根據需要做一些改動
圖3 錄制宏名稱定義
圖4 排序前
圖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
圖6 代碼截圖
注:錄制宏無法實現循環,判斷功能,但很多操作代碼都是可以參考的
以上,為本次的介紹内容,下回見。
本文首發于Excel高效辦公之VBA。排版和細節略作修改,發于頭條
,