|
VBA基本語(yǔ)句的構(gòu)成與過程（下） 前面給大家介紹了基本的程序單元，Sub過程，今天就給大家介紹一下自定義函數(shù)，F(xiàn)unction過程以及如何組成程序。 Function過程的結(jié)構(gòu) Function過程也稱為函數(shù)過程，與Sub過程最大的區(qū)別在于，該過程將返回值。編寫一個(gè)Function過程相當(dāng)于編寫了一個(gè)函數(shù)。下面我們就來學(xué)習(xí)在VBA中使用Function過程的方法。 Function過程是VBA中一種常用的過程，F(xiàn)unction過程以Function開始，以End Function結(jié)束，其結(jié)構(gòu)如下：  Function過程之所以又被稱為函數(shù)過程，是因?yàn)樵撨^程將返回值并且可以在Excel工作表中和VBA過程中為自定義函數(shù)使用。 聲明Function過程 要使用Fuction 過程，就需要聲明Function過程，指定過程的名稱、作用域和可以存儲(chǔ)的數(shù)據(jù)類型等。聲明Function過程的結(jié)構(gòu)與聲明Sub過程的結(jié)構(gòu)似。 如果要聲明一個(gè)簡(jiǎn)單的公共函數(shù)過程，則結(jié)構(gòu)如下：  其中Public可以省略，則可以寫成：  如果聲明一個(gè)簡(jiǎn)單的私有函數(shù)過程，則該過程的結(jié)構(gòu)為：  例如：生成一個(gè)1~100之間的隨機(jī)整數(shù)，則程序如下：  其中，Rnd函數(shù)的作用在于生成0~1之間的一個(gè)單精度隨機(jī)數(shù)，語(yǔ)法為Rud()。Int則為數(shù)據(jù)取整數(shù)，語(yǔ)法為Int()。In(Rnd()* 110 1)即Int(Rnd()* 10 1) Rnd()*100)和并計(jì)算后的效果。Rnd()* 10 1取整可得到1~10的整數(shù);；Rnd()* 100取整可得到10~ 90的10的倍數(shù)。 在VBA中使用自定義函數(shù) 在編寫好一個(gè)Function過程之后，我們可以在VBA過程中像使用內(nèi)置函數(shù)-樣，將其作為自定義函數(shù)使用，以彌補(bǔ)VBA內(nèi)置函數(shù)功能的不足之處。 以sjsh的Function過程為例，如果要編寫一個(gè)Sub 過程，讓sjsh自定義函數(shù)的計(jì)算結(jié)果以對(duì)話框的方式顯示，可以寫作:  編寫好代碼后，在VBE窗口按下F5鍵，運(yùn)行Sub過程，即可出現(xiàn)結(jié)果。 組織程序 1、設(shè)置縮進(jìn) 在編寫VBA代碼時(shí)，適當(dāng)?shù)脑O(shè)置縮進(jìn)，有助于我們理解和閱讀程序。一般情況下，VBA過程的語(yǔ)句要比過程名縮進(jìn)定的字符，在Do---Loop、While---. Wend、For---Next 、Select Case、With 等語(yǔ)句中，也存在需要縮進(jìn)的情況。我們一般設(shè)置縮進(jìn)字符4個(gè)空格。 設(shè)置縮進(jìn)字符4個(gè)空格的方法一般可以用下面三種方法進(jìn)行設(shè)置。 a、運(yùn)用Tab鍵進(jìn)行縮進(jìn)，選中需要縮進(jìn)的代碼，點(diǎn)擊Tab鍵。 b、選中VBA窗口中執(zhí)行“編輯”→“縮進(jìn)”命令即可。如下圖所示：  c、在Excel VBA中，默認(rèn)情況下Tab寬度為4個(gè)空格。如果需要修改Tab寬度，可以在VBA窗口中執(zhí)行“工具”→“選項(xiàng)”命令，打開“選項(xiàng)”對(duì)話框，在“編輯”選項(xiàng)卡的'Tab寬度”文本框中進(jìn)行設(shè)置，如下圖所示：  在編寫代碼時(shí)的基本知識(shí) 1、長(zhǎng)行截短成兩行 當(dāng)語(yǔ)句中存在一行代碼過長(zhǎng)的情況時(shí)，可以利用空格''和下劃線“-”將過長(zhǎng)的這一行代碼截短，使一行代碼分成兩行。  2、多行合并為一行 利用英文狀態(tài)下的冒號(hào)':'作為各行之間的分隔，將多行短代碼合并，使其成為一行。  其中“%' 相當(dāng)于“As Integer',是Integer數(shù)據(jù)類型的類型聲明符。 3、注釋代碼 手動(dòng)注釋代碼與取消是在VBA代碼中的注釋語(yǔ)句以英文狀態(tài)下的單引號(hào)(')開頭或用Rem代替，則在后面的內(nèi)容就是注釋的內(nèi)容。注釋后的語(yǔ)句呈現(xiàn)綠色，取消則刪除即可。 設(shè)置與取消注釋快則在VBE窗口中執(zhí)行“視圖”→“工具欄‘→”編輯’命令，打開工具欄，點(diǎn)擊“設(shè)置注釋塊”按鈕。 The End 今天的內(nèi)容到此結(jié)束了，VBA基本語(yǔ)句的基本構(gòu)成和相關(guān)知識(shí)介紹也基本結(jié)束了，希望大家能夠多多支持，謝謝大家！ 編輯：程靖 |
|
|
