哈嘍，大家好呀。

我相信有許多朋友都是很想學(xué)習(xí)Excel的王炸功能——VBA，但是礙于其難度系數(shù)，一直可望而不可及。

沒關(guān)系，今天就和小編一起從入門開始學(xué)習(xí)吧！

一、先認(rèn)識一下VBA

VBA為廣大用戶提供了對Excel功能進(jìn)行二次開發(fā)的平臺。

我們可以借助VBA完成許多僅憑基本操作和公式無法實(shí)現(xiàn)的功能，并且可以實(shí)現(xiàn)工作自動(dòng)化，提高工作效率。

二、打開VBA編輯器的三種方式

1.在功能區(qū)的“開發(fā)工具”中打開VBE界面

很多同學(xué)的Excel功能區(qū)中沒有“開發(fā)工具”選項(xiàng)的，我們可以通過“選項(xiàng)”中的“自定義功能區(qū)”，調(diào)用出這個(gè)功能。

展開全文

然后選擇“開發(fā)工具”——Visual Basic功能鍵，就可以打開VBE界面。

2.在工作表標(biāo)簽上單擊鼠標(biāo)右鍵，打開菜單欄；

在彈出的菜單中，選擇“查看代碼”，也可以打開VBE界面。

3.ALT+F11組合鍵打開，這是最常用的打開方式。

注意：無論你使用何種方式打開VBE界面，都要記得，要打開某個(gè)工作薄之后，才可以使用VBE，畢竟EXCEL文件才是VBE的載體。

三、創(chuàng)建寫VBA代碼的地方

在哪編寫代碼呢？今天先學(xué)最常用的：插入 - 模塊。新建一個(gè)模塊來存放編寫的代碼。

四、開始寫代碼

插入（或雙擊）模塊后，在右側(cè)的空白位置就是編寫代碼的地方。

可以執(zhí)行的VBA代碼(宏程序)，結(jié)構(gòu)是這樣的：

Sub程序名（參數(shù)）

可以執(zhí)行任務(wù)的代碼

End Sub

輸入Sub 程序名 然后回車，End Sub就會自動(dòng)輸入。

五、常用的VBA代碼

到了這一步，相信大家已經(jīng)大概掌握了VBA的簡單操作，下面就讓我們來給大家分享幾個(gè)常用的VBA代碼吧，短短幾行，就能讓你的辦公效率得到質(zhì)的飛躍~

示例1：批量取消隱藏工作表

如果需要取消隱藏的工作表很多，右鍵選擇【取消隱藏工作表】就會顯得很繁瑣，我們只需要幾行VBA小代碼就刻意搞定啦！

Sub qxyc

Dim sht As Worksheet

'定義變量

For Each sht In Worksheets

'循環(huán)工作簿里的每一個(gè)工作表

sht.Visible = xlSheetVisible

'將工作表的狀態(tài)設(shè)置為非隱藏

Next

End Sub

示例2：判斷身份證號的位數(shù)是否正確

這樣的一組號碼，不考慮號碼的信息正誤，只看位數(shù)，你很難知道它是否是18位，那么此時(shí)用代碼來處理，就顯得很方便了，如下：

【代碼解析】

Line1：使用工作表“IF判斷語句”作為代碼中引用對象的統(tǒng)一父級對象；

Line2：規(guī)定循環(huán)變量i的范圍為2到10，因?yàn)槲覀兪潜闅v單元格，逐行判斷，所以循環(huán)變量應(yīng)該以單元格的行號作為循環(huán)依據(jù)，所以是ROW2到ROW10；

Line3：Cells(i, 1)說明是某一行和第一列的交點(diǎn)單元格，當(dāng)i變量為2，3，4，…，10時(shí)，對應(yīng)的單元格地址就是A2，A3，A4，…，A10。用LEN函數(shù)提取單元格字符串的長度，判斷是否等于18；

Line4：如果判斷條件滿足，則Cells(i, 2)對應(yīng)的B列單元格中輸入“18位”；

Line5：判斷語句的結(jié)束語句；

Line6：循環(huán)語句的結(jié)束語句；

Line7：With語句的結(jié)束語句。

示例3：批量重命名工作表

工作表默認(rèn)的名稱是Sheet1這種，對我們查找數(shù)據(jù)時(shí)很不方便，我們想批量給他改名怎么操作呢？

六、測試、執(zhí)行、保存代碼

在編寫代碼時(shí)經(jīng)常要測試是否正確。測試方式是把光標(biāo)放在代碼行的任意位置，點(diǎn)擊 運(yùn)行小按鈕。

要想執(zhí)行VBA代碼，我們只需要右鍵點(diǎn)擊 指定宏- 選擇編寫的宏名稱即可。

另外，有個(gè)點(diǎn)要特別注意，我們在保存文檔的時(shí)候，【保存類型】要選擇為 “啟用宏的工作簿”類型，這樣我們辛苦寫出來的VBA代碼才能保存下來。

代碼一兩行，工作再也不用忙斷腸。

今天的VBA入門課程，你都學(xué)會了嗎？

還有疑問的同學(xué)，歡迎留言評論區(qū)。

對了，我們還有一套免費(fèi)的VBA脫白課程，送給大家！

掃碼進(jìn)群獲取鏈接

免費(fèi)觀看！