疑難千尋千解叢書：Excel 2013 VBA編程與實踐

《疑難千尋千解叢書：Excel2013 VBA編程與實踐》是2015年8月電子工業出版社出版的圖書，作者是黃朝陽。

基本介紹

• 書名：疑難千尋千解叢書：Excel2013 VBA編程與實踐
• 作者：黃朝陽主編; 羅剛君，章蘭新，陳國良編著
• ISBN：978-7-121-26396-5
• 頁數：580頁
• 定價：89.00元
• 出版社：電子工業出版社
• 出版時間：2015年8月
• 裝幀：平裝
• 開本：16

內容簡介

《Excel 2013 VBA編程與實踐》為讀者展示 ExcelVBA編程的實戰技巧，包括工作中最常用的查詢、定位、格式轉換、報表拆分與合併、開發自定義函式、處理檔案與資料夾、功能區設計，以及外掛程式開發實戰與原理分析。

《Excel2013 VBA編程與實踐》側重於解決問題和展示解題思路，案例包含諸多常見疑難的解決方案。閱讀本書後，讀者可以解決工作中的諸多疑難問題，大大提高工作效率，且有助於提升編程能力，拓展思路，從理論向實戰邁進。

好的代碼應該同時具備準確、糾錯、兼容和效率四個特性，《Excel 2013 VBA編程與實踐》所有的案例都在準確性與高效性的基礎上提供完善的錯誤處理措施與思路講解。《Excel 2013 VBA編程與實踐》包括 205 個實用案例和一個大型綜合套用——開發送貨單套打程式。書中的每個案例均採取疑難描述、解決方案、操作方法、原理分析和知識擴展五個步驟進行講解，力圖在解決問題的同時讓讀者

內容提要

《Excel 2013 VBA編程與實踐》為讀者展示 Excel VBA 編程的實戰技巧，包括工作中最常用的查詢、定位、格式轉換、報表拆分與合併、開發自定義函式、處理檔案與資料夾、功能區設計，以及外掛程式開發實戰與原理分析。

《Excel 2013 VBA編程與實踐》側重於解決問題和展示解題思路，案例包含諸多常見疑難的解決方案。閱讀本書後，讀者可以解決工作中的諸多疑難問題，大大提高工作效率，且有助於提升編程能力，拓展思路，從理論向實戰邁進。

好的代碼應該同時具備準確、糾錯、兼容和效率四個特性，《Excel 2013 VBA編程與實踐》所有的案例都在準確性與高效性的基礎上提供完善的錯誤處理措施與思路講解。《Excel 2013 VBA編程與實踐》包括 205 個實用案例和一個大型綜合套用——開發送貨單套打程式。書中的每個案例均採取疑難描述、解決方案、操作方法、原理分析和知識擴展五個步驟進行講解，力圖在解決問題的同時讓讀者

可以通曉其思路和原理。

讀者在學習本書的同時，如果配合 VBA 入門圖書《來吧，帶你玩轉 Excel VBA》或者《Excel VBA程式開發自學寶典》（第 3 版）學習，將會取得更好的效果。另外，《Excel 2013 VBA編程與實踐》附贈了書中所有的案例檔案與原始碼，讀者可到網上下載學習。

作者簡介

黃朝陽，網名apolloh，ExcelTip.net站長，微軟全球最有價值專家（MVP）。擁有十多年豐富的企業信息化實踐和管理經驗，精通Excel和MS SQL在企業中的套用。早期曾在多個Office技術社區擔任版主，參與過多部Excel暢銷書的編著工作。

羅剛君，網名andysky，ExcelTip.net技術社區版主，多個Office技術社區資深版主，從事Excel軟體研究與寫作多年，精通Excel VBA與函式、圖表。在公司擔任電腦技術管理,對辦公套用有較豐富的實戰經驗和心得。

章蘭新，擁有十多年豐富的政府信息化實踐、管理和組織實施經驗，精通Excel和MSSQL在管理中的套用。長期在政府財政經濟部門實施電腦技術與管理、統計、數據分析相融合的工作，一直致力於推廣Excel和資料庫技術，對辦公套用有極豐富的實戰經驗和心得。

陳國良，網名gouweicao78，微軟全球最有價值專家（MVP），ExcelTip.net技術社區總版主，多個Office技術社區資深版主，從事公路、鐵路工程建設管理十多年，精通Excel函式與公式，具有豐富的實戰經驗，參與過多部Excel暢銷書的編著工作。

目錄

第1章基礎理論 1

1.1 變數、常量與數據類型 1

疑難1 正確地定義變數和數據類型有何優勢 1

 數據類型與對象類型 5

疑難2 公共變數和靜態變數都有何用處 6

 公共變數與靜態變數的特點 8

1.2 程式防錯要點 8

疑難3 常見的代碼錯誤由哪些原因造成 8

 查閱VBA幫助的方法 12

疑難4 如何偵測代碼出錯，並將運行代碼的錯誤原因發給作者 12

 程式出錯的類型 13

疑難5 如何開發完善的程式 14

 數組區域對VBA程式的影響 17

1.3 練習與思考 18

第2章數據查找技巧 19

2.1 快速查找 19

疑難6 能否按範圍批量查找數值 19

疑難7 能否將符合多條件之一的所有數據提取到新表中 22

 判斷工作表是否存在的方法 23

疑難8 可否按格式查找單元格，然後替換其格式 25

 FindFormat的使用技巧 26

疑難9 如何找出A線的不達標人員信息 27

 單列多條件與多列多條件篩選的區別 29

疑難10 如何查找所有的“#”並標識為上標 29

 定位單元格任意字元的方法 30

疑難11 如何找出還款時間超過一年及未還款的客戶信息 31

 日期函式Datedif的特性 32

疑難12 可以將查找到的所有數據串聯並寫入剪貼簿中嗎 33

疑難13 可以創建一個工具列來方便查找嗎 35

 如何區分精確匹配與模糊匹配 37

疑難14 能否按相似度查找所有的數據 37

 利用Array向區域中一次性寫入多個常量 39

疑難15 如何在具有合併單元格的區域中多條件逐步查找 40

 通過“MergeArea”屬性返回合併區域 41

疑難16 如何查找成績並分批傳送郵件 42

 VBA中郵件正文的換行符表示法 43

疑難17 如何在輸入時逐步查找 44

 通過KeyUp事件自動執行查詢 46

2.2 跨表查找內容 47

疑難18 能否將所有表中的完成目標者匯總到“總表” 47

 利用SpecialCells定位實現快速查找  48

疑難19 查找每月產量冠軍名單，並在窗體中顯示 49

 不採用循環，一次性找出最大值所在行 50

疑難20 如何找出工作簿中所有的外部連結且將它們轉換成值 51

 如何獲取工作簿中的外部連結 52

疑難21 可否模糊查找所有部門的電話信息 52

 Target與Activecell的區別 54

疑難22 如何實現將所有未收貨款者在狀態欄隨機顯示 54

 利用OnTime定時執行程式 56

疑難23 可否在單元格中創建多級下拉選單 56

 ActionControl對象的功能與限制 60

疑難24 可否在資料夾的所有檔案中查找特定信息並匯總到新表 60

疑難25 如何統計資料夾中所有的成績工作簿中不及格人數 64

 調用工作表函式時應如何書寫區域引用型參數 65

2.3 檔案查找與轉換 66

疑難26 如何判斷指定的檔案是否存在 66

 判斷檔案是否存在的函式 67

疑難27 如何進行深度查找且創建檔案目錄 68

疑難28 可否在工作表中列出所有大於5MB的檔案 70

疑難29 如何將所有的Word檔案轉換成PDF檔案 72

疑難30 如何將xlsm和xlsx格式的所有檔案轉換成xls格式 76

疑難31 如何在網上鄰居的共享盤中查找並打開“單價表” 78

疑難32 如何實現全盤查找且播放音樂檔案 79

疑難33 能否在資料夾的所有工作簿中執行批量替換 81

疑難34 能否根據成績表和模板生成Word成績通知單 84

2.4 圖片查找與引用 87

疑難35 如何瞬間刪除當前表中藝術字和圖表等以外的圖片 87

 DrawingObjects與Shapes對象的區別 89

疑難36 可以將簽名圖片複製到表中所有的簽名處嗎 89

 複製圖形對象與複製數據的區別 90

 Selection代表什麼 90

疑難37 如何像vlookup引用數據一樣引用圖片 91

 循環彈出對話框直到用戶正確操作為止的編程思路 93

疑難38 能否對材料表分頁且調用材料圖片 94

2.5 練習與思考 97

第3章數據處理 98

3.1 按條件定位的技巧 98

疑難39 如何一次性定位產量大於1000的所有單元格 98

 使用定位技術減少循環語句的循環次數 99

疑難40 可否全選至少三科不及格的學生姓名 100

 通過SpecialCells定位錯誤值 103

疑難41 工作表中所有的錯誤值是否可隱藏起來 102

疑難42 能否定位數值區域並轉換成以“萬”為單位 104

 VBA中如何處理雙引號 105

疑難43 如何定位當前表的最大值或最小值 105

 調用工作表函式並配合Find方法查找最大值 107

疑難44 能否定位並標識高於平均值的單元格 107

 VBA中數字、漢字的大小關係 109

疑難45 如何反向選擇工作表區域 109

 輔助區的重要性 110

3.2 數據處理及格式轉換 111

疑難46 能否一鍵對選區橫向、縱向匯總 111

 “R1C1”引用方式的優點 112

疑難47 如何將單詞在大寫、小寫與首字母大寫間任意切換 113

 利用StrConv函式對英文進行大寫、小寫和首字母大寫轉換 114

疑難48 如何將二維的材料錶轉換成一維表 115

 使用數組函式Array簡化代碼 116

疑難49 如何開發一個通用的一維錶轉二維表的工具 117

 對數組和區域中的值去除重複值時的區別 120

疑難50 如何開發一個通用的二維錶轉一維表的工具 121

疑難51 可否將字元串中的字母、數字和漢字分離到多單元格中 124

 利用Like運算符區分漢字、數字和字母 125

疑難52 能否一鍵轉換表達式為計算結果 126

 通過Evaluate方法轉換表達式 127

疑難53 數據有效性可以設定為關聯的三級下拉選單嗎 127

疑難54 能否將職工信息按自定義序列排序 130

 新舊版本中Sort的差異 131

疑難55 可以不打開工作簿而提取其數據嗎 132

 在VBA中調用公式實現從未打開的工作簿中取值 134

疑難56 可否一鍵保護所有的公式 134

 切換Locked 屬性實現公式保護 135

疑難57 如何實現發票金額分解 136

 MID提取文本的特點 137

疑難58 VBA可以破解工作表密碼嗎 138

 表的分類 139

疑難59 如何將不規範的時間統一為“hh:mm:ss.00”格式 139

 Format與Text函式的相同點和不同點 141

疑難60 可以生成指定範圍的不重複隨機數嗎 141

 Collection對象的優勢 142

疑難61 如何對工作簿減肥 143

 檔案虛胖的常見原因 144

疑難62 可否讓數字在文本與數值之間快速切換 145

 在文本與數值間切換的VBA思路 146

疑難63 如何將“/”分隔的數據進行匯總 147

 以“/”為分隔設定取其左右字元的思路最佳化 148

疑難64 可否一鍵刪除工作表中所有的空白行 148

 SpecialCells方法的限制 150

疑難65 能實現貼上數據時跳過隱藏區嗎 150

 如何確定單元格是否被隱藏 153

疑難66 可否讓單元格的值真正地四捨五入 153

疑難67 如何對相同值進行標識著色 155

 ColorIndex屬性的限制對VBA代碼的影響 157

疑難68 如何根據工資計算零鈔數量 158

 獲取選區第一列及已用區域的交集 160

疑難69 可否將職工資料表一鍵轉換成列印格式 160

 如何計算圖片所在單元格的地址 162

3.3 單元格合併技巧 162

疑難70 能否一鍵合併相同且相鄰的所有單元格 162

 利用DisplayAlerts屬性關閉合併單元格時的提示加快代碼執行速度 164

疑難71 如何實現按產品合併產量數據表 164

 利用變數暫存數據，代替輔助區 166

疑難72 能否改進“跨越合併”，使其居中保留所有的數據 166

 Merge方法的真正功能 167

疑難73 可以合併同類項且分類匯總嗎 168

 通過選擇性貼上格式實現合併單元格 170

 需要頻繁操作單元格時的提速方法 170

疑難74 如何實現合併時保留所有的數據，而拆分時還原數據 171

 看不見的特殊字元的套用 173

疑難75 如何一鍵選擇所有合併的單元格 174

 定位合併單元格 175

 查找設定對下一次查找結果有何影響 175

疑難76 如何取消所有的合併區域，並對所有的單元格填充數據 175

 合併區域的賦值方式 176

疑難77 能否實現撤銷合併後能還原所有數據的多單元格合併 177

 合併單元格後再取消合併不丟失數據的思路 178

疑難78 如何將指定的單元格合併到一個選區 178

 將指定單元格連結到一個選區 180

疑難79 可以讓合併單元格自動換行嗎 180

 工作簿事件過程與普通過程的區別 182

3.4 報表合併與拆分 183

疑難80 如何合併所有工作表的數據到一個表中 183

 在複製數據時既去除公式，又不影響數值的顯示狀態 185

疑難81 如何實現多表合併匯總 185

 利用相對引用公式批量合併數據，避免使用循環 187

疑難82 如何將多個工作簿中的所有工作表合併到一個工作表中 187

 通過禁用工作簿重算提升代碼效率 190

疑難83 如何將多個工作簿數據合併到一個工作簿 190

 利用變數作為輔助進行條件判斷 194

疑難84 如何實現按條件將單個工作表拆分成多個工作表 194

 Range.AutoFilter方法的特殊性 198

疑難85 如何將工作簿中的每個工作錶轉換為獨立工作表 198

 在不同的Excel版本中如何選擇檔案格式 200

3.5 單元格顏色的綜合套用 201

疑難86 不同版本的Excel在顏色處理方面有區別嗎 201

 不同的版本中顏色差異對程式的影響 202

疑難87 可以在Excel 2013中按顏色篩選再做擴展嗎 203

 CurrentRegion與Usedrange對程式的影響 206

疑難88 如何實現將顏色排序 207

 借用輔助區和調用老版本的Sort功能提升程式的通用性 208

疑難89 可以按顏色對選區的數據分類匯總嗎 209

 修改顏色不觸發公式重算和任何VBA事件 211

疑難90 如何用函式對單元格的背景和字型按顏色匯總 212

 如何聲明可選參數 214

 IIF函式與IF語句的區別 214

3.6 重複數據處理 214

疑難91 可否清空重複值所在單元格並以背景色標示 214

 Countif函式在去重複值中的套用 216

 Countif函式的限制 216

疑難92 可用紅圈標示重複出現的數據嗎 217

 Worksheet.CircleInvalid方法的限制 218

疑難93 如何提取兩列數據中的相同項與不同項 219

 利用Transpose函式實現區域轉數組 220

疑難94 可否一鍵刪除重複行 221

 Range.RemoveDuplicates方法中Columns參數的限制 222

3.6 練習與思考 223

第4章報表列印 224

4.1 列印設定 224

疑難95 如何一次性設定“總表”以外的工作表的頁腳 224

 選擇工作表數量對頁腳的影響 225

疑難96 可否將所有工作表的列印區域設定為有數據的區域 225

 更新列印區域設定的限制 227

疑難97 可否將訂單錶轉換成每10行列印一頁 228

 全自動批量插入分頁符 230

疑難98 如何讓跨頁的合併單元格在列印後能完整顯示 229

 判斷合併單元格是否跨頁 232

4.2 特殊列印格式設計 231

疑難99 如何製作工資條 232

疑難100 如何列印工資卡 234

 借用載入宏提升模板數據的安全性 237

疑難101 VBA可以實現對工作表分頁小計嗎 237

 利用宏表函式Get.Document(50)獲取工作表頁數 242

疑難102 如何同時列印頂端標題和底端標題 241

 計算第一個分頁符所在的行號 249

疑難103 可以借用圖片實現底端標題列印嗎 248

 Export與API方式將區域轉換成圖片的差異 251

疑難104 可否將訂單錶轉換成適合針式多聯列印的報表格式 251

 修改CopyObjectsWithCells屬性實現複製數據時忽略圖形對象 254

疑難105 如何實現雙面列印 254

 手動中斷程式與禁止中斷程式 255

疑難106 可以只列印活動單元格所在頁嗎 255

 如何計算分頁符位置和當前頁的序號 257

4.3 思考與練習 257

第5章借用事件讓程式自動化 258

5.1 工作表事件 258

疑難107 錄入M2和M3時可自動將2或3顯示為上標嗎 258

 Target與ActiveCell的相同點與不同點 259

疑難108 可否在錄入產品規格時自動在右邊顯示表達式的值 260

 修改EnableEvents屬性避免事件的連鎖反應 261

疑難109 可否實時記錄指定區域的修改記錄 262

 讓批註框自動調整大小的必要步驟 264

疑難110 能否雙擊首行或首列時彈出工作表目錄 264

 工作表事件與工作簿事件的分別 265

5.2 工作簿事件 266

疑難 111 能否在啟動工作簿時自動創建工作表目錄 266

 Workbook_Open事件與Auto_open宏的相同點和不同點 267

疑難112 進入包含“貨款”的工作表時可語音提示未收款客戶名稱嗎 268

 DateDiff函式與DateDif函式的相同點和不同點 269

疑難113 能否自動記錄工作簿的已列印次數 270

 BeforePrint事件的缺陷 271

疑難114 輸入重複的工號時能否提示“已重複” 271

 創建讓用戶指定執行方式的對話框的三種方法 273

疑難115 能否在狀態欄顯示選區中的最大值和最小值地址 273

 工作表函式Counta的參數應如何對待Range對象的默認屬性值 275

5.3 應用程式事件 275

疑難116 可否讓新建的工作簿包含“進庫”、“出庫”和“異常統計”三個工作表 275

 藉助類實現應用程式級的事件 277

 安裝載入宏的兩種方法 278

疑難117 可否新建圖表時默認顯示為圓角加陰影效果 279

 工作簿級與應用程式級的圖表事件差異 280

疑難118 可否選擇單元格時整行與整列自動著色 280

 引用活動視窗的可見區域 282

5.4 思考與練習 283

第6章開發自定義函式 284

6.1 自定義函式基礎 284

疑難119 如何開發自定義函式 284

 如何跨工作簿調用自定義函式 288

疑難120 自定義函式在不同的版本中有何差異 288

 顏色對自定義函式的影響 289

 函式參數的數量上限 291

疑難121 如何對自定義函式添加功能描述與參數說明 291

 通過Application.MacroOptions方法為自定義函式添加參數說明 292

6.2 開發自定義函式 293

疑難122 如何對區域內混雜字元串中的數字求和 293

 Excel公式對“+”的處理方式 294

疑難123 如何分離字元串中的數值、英文和漢字 294

 正則表達式在字元處理中的優勢 295

疑難124 如何將文本混雜字元串及表達式轉換為值 296

 正則表達式中如何表示數字、字母和漢字範圍 297

疑難125 如何按時間段匯總金額 298

 根據計算對象的規範性決定函式參數的個數 300

疑難126 如何對具有分隔設定的數據分類匯總 300

 Split函式產生的數組的特點 302

疑難127 超過15位的數字如何求和 302

 Excel對數據計算的長度限制 304

疑難128 如何根據身份證號碼獲取出生日期、年齡和性別 304

 身份證號碼所包含的個人信息 306

疑難129 可否將發票格式的數字金額合併且轉換為大寫金額 307

 聲明正確的函式類型，從而最佳化函式的執行效率 308

疑難130 如何突破Rank函式排名的限制 308

 去除重複值的常用方法 310

疑難131 如何實現按數據出現次數排序 310

 Collection與字典的區別 312

疑難132 可以用函式改變引用區域的值嗎 312

 利用自定義函式修改引用區域的值的兩種方法 314

疑難133 如何對兩個以逗號分隔的亂序字元串比較異同 315

 將Split函式嵌套套用從字元串中分別獲取品名與數量 316

6.3 開發具有可選參數的自定義函式 317

疑難134 可以擴展Vlookup函式實現返回所有符合條件的值嗎 317

 利用Find替代工作表函式Vlookup實現多個數據查找 318

疑難135 可以用一個函式將人民幣大小寫相互轉換嗎 319

 通過拆分法理解代碼 321

疑難136 可以讓函式的兩個參數全是可選參數嗎 322

 將單個參數聲明為可選參數的方法 323

疑難137 可以用函式連線記憶體數據和區域中所有的文本嗎 324

 利用ParamArray聲明不確定個數的函式參數 325

6.4 思考與練習 326

第7章檔案與資料夾管理 327

7.1 檔案管理 327

疑難138 能否在打開檔案時自動備份檔案 327

 將過程命名為“Auto_Open”使其自動執行 328

疑難139 如何讓檔案打開一次後就自我銷毀 328

 檔案“自殺”的條件 329

疑難140 如何一鍵刪除3年以前創建的所有檔案 329

 DATEDIF與DATEDIFF的區別 330

疑難141 可以刪除18個月沒有打開過的檔案嗎 331

 用DATEDIF計算檔案閒置時間的技巧 331

疑難142 可以在收藏夾中對當前工作簿創建捷徑嗎 332

 獲取收藏夾地址的方法 333

7.2 資料夾管理 334

疑難143 如何瞬間刪除D糟中所有的空資料夾 334

 將代表磁碟的字元串轉換成磁碟對象的方法 334

疑難144 如何獲取指定目錄下的檔案列表 335

 Dir函式查找子資料夾的注意事項 337

疑難145 安裝多個版本的Excel時可以隨心所欲地選擇打開方式嗎 338

 將Excel捷徑導入“Sendto”資料夾 339

疑難146 如何批量創建以本月每天的日期命名的資料夾 341

 利用DateSerial的糾錯功能計算本月天數 342

7.3 思考與練習 342

第8章 VBA操作圖表 343

8.1 利用VBA批量修改圖表格式 343

疑難147 如何批量修改圖表標籤 343

 操作圖表標籤的條件 347

疑難148 如何批量移位標籤 347

 手工位移圖表標籤的限制 350

疑難149 如何對圖表系列設定條件格式 350

 填充圖表系列的兩種方法 354

疑難150 可否一鍵統一圖表大小並對齊 354

 圖表名稱的特點 356

8.2 思考與練習 356

第9章 VBA操作圖形對象 357

9.1 圖形對象的批量操作 357

疑難151 如何刪除E列存放的圖表以外的圖形對象 357

 通過TopLeftCell和BottomRightCell定點陣圖片位置 358

疑難152 如何讓所有的圖形對齊所在單元格左框線 359

 通過統一Left屬性對齊圖片 359

疑難153 如何一鍵導入工作簿所在路徑下的家具圖片 360

 錄製“批量插入圖片”的宏的缺陷 361

9.2 批註的高級套用 362

疑難154 如何將指定列的數據批量追加到批註中 362

疑難155 如何批量導入圖片到單元格的批註中 365

 在“打開”對話框中篩選檔案格式的方法 366

疑難156 可以對批註進行替換嗎 367

 Unload Me、End和Exit Sub的區別 370

疑難157 如何在所有的批註末尾追加日期 370

 通過設定AutoSize屬性使批註框自動調整大小 371

疑難158 如何批量修改批註的外觀 372

 聲明正確的變數類型及防錯 374

9.3 圖形對象綜合套用 374

疑難159 如何創建圖片目錄與批量插入圖片 374

 單元格的行高與列寬限制 378

疑難160 如何實現輸入品名時查看當前路徑下的同名圖片 378

 通過修改圖像控制項的Picture屬性更新圖片 379

疑難161 如何實現批量導入圖片且自動排版列印 380

 利用FSO技術中的Getextensionname獲取檔案後綴名 384

疑難162 可否以模糊匹配方式批量導入圖片 384

 借用通配符“*”實現模糊匹配檔案名稱稱 387

疑難163 如何開發批量刪除指定類型的圖形對象的工具 387

 如何遍歷控制項集合 390

9.4 練習與思考 390

第10章窗體控制項套用 391

10.1 ActiveX控制項套用 391

疑難164 可以利用列表框強化數據有效性嗎 391

 列表框相較數據有效性的靈活性 393

疑難165 如何利用複合框引用區域的唯一值 394

 複合框調用數據的兩種方法及各自的優勢 396

疑難166 能否利用複合框和列表框打造二級選單 396

 利用MouseMove事件獲取組合框的值的技巧 399

10.2 窗體設計技巧 400

疑難167 如何用一個窗體展現多項不同的內容 400

 分頁顯示的兩種方法 403

疑難168 如何實現利用快捷鍵啟用和關閉窗體 403

 借用命令按鈕的Cancel屬性快捷關閉窗體 405

疑難169 如何用一個按鈕執行多個功能 406

 利用PasswordChar屬性隱藏敏感字元 408

疑難170 如何讓日期輸入器窗體緊隨活動單元格 409

 影響窗體Left、Top屬性的因素 411

疑難171 VBA可以設計彩蛋嗎 412

 MouseUp事件中的Button與Shift參數的作用 414

疑難172 如何通過窗體控制實現工作表隔行插入行 415

 通過Shift參數控制Insert方法的單元格移動方向 418

疑難173 如何在窗體中開發滑鼠右鍵快捷選單 419

 創建自定義選單的基本思路 420

疑難174 在窗體Show狀態下可以調整控制項大小嗎 421

 通過滑鼠指針的坐標變化同步更新控制項的寬度和邊距 423

疑難175 在窗體Show狀態下如何調整控制項的位置 423

 MouseMove事件中Button參數的套用技巧 425

疑難176 如何檢測窗體中文本框的數據有效性 426

 對文本框設定數據有效性檢驗的優勢 427

疑難177 能否通過代碼生成窗體及控制項和代碼 428

 用代碼操作代碼的必要條件 430

10.3 窗體與工作表之數據互動 431

疑難178 可否將多工作表中符合條件的值顯示在窗體中 431

 列表框的ColumnHeads屬性的特點 434

疑難179 如何實現通過窗體向多工作表中錄入數據 434

疑難180 如何開發日曆工具箱 438

 類的主要套用領域 442

 Excel對日期計算的限制 442

疑難181 如何實現多條件電話查詢 442

 TextBox1_Change事件與TextBox1_Exit事件的異同 444

疑難182 如何開發複選框批量管理工具 445

 區分三種複選框控制項 447

疑難183 如何讓窗體控制項自適應工作表數據變化 448

 用代碼創建新控制項 450

疑難184 可以讓拆分工作簿的列表框具有拖放功能嗎 451

 控制項拖放相關的事件 454

疑難185 如何設計對檔案批量重命名的工具箱 454

10.4 練習與思考 460

第11章功能區選單與backstage視圖設計 461

11.1 創建功能區選單 461

疑難186 如何創建新選項卡及子選單 461

 創建功能區選單的語法與代碼結構 463

疑難187 如何在“開始”選項卡中插入彈出式選單 466

 創建彈出式選單的語法 467

疑難188 如何創建對話框啟動器 469

 在標籤控制項中讓多段文字換行的技巧 471

疑難189 如何在“視圖”選項卡中插入“閱讀模式”的切換按鈕 472

 切換按鈕與命令按鈕的區別 474

疑難190 如何將常用卻又未顯示在功能區中的按鈕顯示在“插入”選項卡中 475

 如何查看Excel內置命令的id  476

疑難191 如何製作功能區代碼模板 477

 模板的功能與製作技巧 479

11.2 backstage視圖設計 481

疑難192 如何在“檔案”選單中添加命令按鈕 481

 如何調用外部程式 483

疑難193 能否在“檔案”選單中創建多組命令按鈕 483

11.3 思考與練習 486

第12章用VBA訪問網路資源 487

12.1 導入網頁列表 487

疑難194 如何一鍵導入最近三個月人民幣與美元的歷史匯率 487

 通過QueryTables.Add方法和QueryTable.Refresh方法導入網頁數據 488

疑難195 可否錄入城市名稱後自動列出火車票信息 489

 讓Worksheet_Change事件僅作用於固定區域的技巧 491

12.2 導入不規範的網頁數據 491

疑難196 能否批量計算手機號碼的歸屬地、區號與卡類型 491

 分析網頁原始碼的基本思路 493

疑難197 可否讀取網頁的天氣預報數據 496

 查看網頁原始碼的方法 497

12.3 練習與思考 499

第13章設計Excel通用工具 500

13.1 開發Excel外掛程式 500

疑難198 如何開發定位工具箱擴展Excel定位的功能 500

 Excel定位的限制 506

疑難199 可以利用外掛程式一鍵錄入常用VBA代碼嗎 507

 計算當前代碼的行號 511

疑難200 如何開發帶功能區選單的中英文互譯外掛程式 512

 用公式實現中英文互譯 514

13.2 封裝代碼 515

疑難201 如何將已編好的兩段代碼封裝為COM載入項 515

 安裝COM載入項的三種方法 522

疑難202 如何封裝包含工作簿事件的代碼 522

 封裝事件過程的基本思路 525

疑難203 如何將自定義函式封裝為COM載入項 525

 VBA中調用COM載入項中的函式的方法 528

13.3 設計安裝程式 529

疑難204 如何將COM載入項封裝為EXE格式的安裝程式 529

 InnoSetup軟體的參數說明 533

疑難205 可否開發具有撤銷功能且可單擊卸載的外掛程式 533

 使用回調函式動態更新選單的指定屬性 537

13.4 練習與思考 538

第14章開發送貨單套打程式 539

14.1 羅列需求 539

14.2 設計表格 540

14.2.1 工作表職能分配 540

14.2.2 設計“配置”工作表 540

14.2.3 設計“列印界面”工作表 541

14.2.4 設計“明細表”工作表 543

14.3 編寫代碼 543

14.3.1 為品名、品牌和型號創建下拉列表 543

14.3.2 開發小寫金額轉大寫金額的函式 546

14.3.3 生成送貨單號 546

14.3.4 列印並保存數據 547

14.3.5 批量列印歷史數據 548

14.3.6 保存並清空數據 550

14.3.7 創建數據透視表 550

14.3.8 功能說明 551

14.4 設計選單 551

14.5 測試功能 552

14.5.1 測試“生成送貨單號” 553

14.5.2 測試品名、品牌與型號的錄入方式 553

14.5.3 測試“列印當前貨單” 554

14.5.4 測試“列印歷史記錄” 555

14.5.5 測試“創建透視表” 556

14.5.6 測試對話框啟動器 557

14.5.7 總結