43個典型excelvba實例

1、43 個典型 個典型 ExcelVBA 實例 實例目錄 目錄例 1.九九乘法表（Print 方法的應用）...................................................................................3例 2 輸入個人信息（Inputbox 函數的應用）.........................................................

2、.............3例 3 退出確認（Msgbox 函數的應用） ...............................................................................5例 4 突出顯示不及格學生.........................................................................................

3、..............7例 5 從身份證號碼中提取性別..............................................................................................8例 6 評定成績等級...................................................................................

4、...............................9例 7 計算個人所得稅............................................................................................................11例 8 密碼驗證.........................................................

5、...............................................................13例 9 求最小公倍數和最大公約數........................................................................................15例 10 輸出 ASCII 碼表...............................

6、..........................................................................16例 11 計算選中區(qū)域數值之和..............................................................................................17例 12 換零錢法（多重循環(huán)）................

7、..............................................................................18例 13 數據排序......................................................................................................................21例 14 彩票幸運

8、號碼..............................................................................................................22例 15 用數組填充單元格區(qū)域..........................................................................................

9、....24例 16 判斷單元格是否包含公式...........................................................................................25例 17 自動填充公式..............................................................................................

10、.................26例 18 鎖定和隱藏公式...........................................................................................................28例 19 將單元格公式轉換為數值................................................................

11、...........................29例 20 刪除所有公式..............................................................................................................29例 21 用 VBA 表示數組公式.................................................

12、..............................................30：例 1.九九乘法表（ 九九乘法表（Print 方法的應用） 方法的應用）1． 案例說明在早期的 Basic 版本中，程序運行結果主要依靠 Print 語句輸出到終端。在 VB 中，Print 作為窗體的一個方法，用來在窗體中顯示信息。但是在 VBA 中，用戶窗體已經不支持 Print 方法了。在 VBA 中，Print 方法只能向“立即窗口

13、”中輸出程序的運行中間結果，供開發(fā)人員調試程序時使用。本例使用 Print 方法在立即窗口中輸入九九乘法表。2． 關鍵技術在 VBA 中，Print 方法只能應用于 Debug 對象，其語法格式如下：Debug.Print [outputlist]參數 outputlist 是要打印的表達式或表達式的列表。如果省略，則打印一個空白行。— Print 首先計算表達式的值，然后輸出計算的結果。在 outputlist 參數中還可以使用

14、分隔符，以格式化輸出的數據。格式化分隔符有以下幾種：— Spc(n)：插入 n 個空格到輸出數據之間；— Tab(n)：移動光標到適當位置，n 為移動的列數；— 分號：表示前后兩個數據項連在一起輸出；— 逗號：以 14 個字符為一個輸出區(qū)，每個數據輸出到對應的輸出區(qū)。3．編寫代碼（1）在 VBE 中，單擊菜單“插入/模塊”命令插入一個模塊。（2）在模塊中輸入以下代碼：Sub multi()For i = 1 To

15、 9For j = 1 To iDebug.Print i; “x“; j; “=“; i * j; “ “;NextDebug.Print NextEnd Sub（3）按功能鍵“F5”運行子過程，在“立即窗口”輸出九九乘法表，如圖 3-1 所示。例 2 輸入個人信息（ 輸入個人信息（Inputbox 函數的應用） 函數的應用）1．案例說明本例演示 Inpu