大家好，今日帶給大家的是VBA語句欣賞，共30則。這些語句在平時寫代碼，做程序時會經(jīng)常的利用到，大家可以利用，也可以對照下面的語句，看看自己哪里還有不足，加深對VBA的理解。
181 Application.Dialogs(xlDialogAlignment).show 顯示'單元格格式'中的'對齊'選項卡
182 Application.Dialogs(xlDialogFontProperties).show 顯示'單元格格式'中的'字體'選項卡
183 Application.Dialogs(xlDialogBorder).show 顯示'單元格格式'中的'邊框'選項卡
184 Application.Dialogs(xlDialogPatterns).show '顯示'單元格格式'中的'圖案'選項卡
185 Application.Dialogs(xlDialogCellProtection).show '顯示'單元格格式'中的'保護'選項卡
186 Application.Dialogs(xlDialogFormulaGoto).show Range('b2'), True '顯示'引用位置'的默認(rèn)單元格區(qū)域并顯示引用使其出現(xiàn)在窗口左上角(注：內(nèi)置對話框參數(shù)的使用)
187 Application.CommandBars(1).Controls(2).Controls(16).Execute 執(zhí)行'定位'話框，相當(dāng)于選擇菜單'編輯——定位'命令
188 Application.Transpose(Array('Sun','Mon','Tur','Wed','Thu','Fri','Sat')) 返回一個垂直的數(shù)組
189 Application.Version '返回使用的Excel版本號
190 Application.Cursor = xlNorthwestArrow 設(shè)置光標(biāo)形狀為北西向箭頭
191 Application.Cursor = xlIBeam 設(shè)置光標(biāo)形狀為Ⅰ字形
192 Application.Cursor = xlWait 設(shè)置光標(biāo)形狀為沙漏(等待)形
193 Application.Cursor = xlDefault 恢復(fù)光標(biāo)的默認(rèn)設(shè)置
194 Application.WindowState 返回窗口當(dāng)前的狀態(tài)
195 Application.WindowState = xlMinimized 窗口最小化
196 Application.WindowState = xlMaximized 窗口最大化
197 Application.WindowState = xlNormal 窗口正常狀態(tài)
198 Application.UsableHeight 獲取當(dāng)前窗口的高度
199 Application.UsableWidth 獲取當(dāng)前窗口的寬度
200 Application.ActiveCell.Address 返回活動單元格的地址(注:返回的是絕對地址)
201 Application.ActivePrinter 返回當(dāng)前打印機的名稱
202 Application.ActiveSheet.Name 返回活動工作表的名稱
203 Application.ActiveWindow.Caption 返回活動窗口的標(biāo)題
204 Application.ActiveWorkbook.Name 返回活動工作簿的名稱
205 Application.Selection.Address 返回所選區(qū)域的地址
206 Application.ThisWorkbook.Name 返回當(dāng)前工作簿的名稱
207 Application.CalculationVersion 返回Excel計算引擎版本(右邊四位數(shù)字)及Excel版本(左邊兩位數(shù)字)
208 Application.MemoryFree 以字節(jié)為單位返回Excel允許使用的內(nèi)存數(shù)(不包括已經(jīng)使用的內(nèi)存)
209 Application.MemoryUsed 以字節(jié)為單位返回Excel當(dāng)前使用的內(nèi)存數(shù)
210 Application.MemoryTotal 以字節(jié)為單位返回Excel可以使用的內(nèi)存數(shù)(包括已使用的內(nèi)存,是MemoryFree和MemoryUsed的總和)
