亚洲精品自在线拍,天天视频国产精品,国产a视频

教程 | 10個(gè)值得收藏的VBA寫法（第1集）

2022.06.05 四川

寫在前面

編程的人都知道，通過代碼解決一個(gè)實(shí)際問題有時(shí)候并不是看上去那樣，背后可能隱藏著很巧妙的實(shí)現(xiàn)邏輯，這些只有開發(fā)者才能真正領(lǐng)悟其中的妙處，相對(duì)于給人刻板印象的編程人員來說，這些恰恰是其閃光點(diǎn)所在。

筆者（公眾號(hào)：URItker）將通過幾期文章系統(tǒng)梳理VBA編程中會(huì)經(jīng)常遇到的一些寫法，它們仿佛散落在沙灘上的貝殼，有的色彩繽紛，有的深掩在沙中，有些可能已經(jīng)在你的口袋里，那就權(quán)當(dāng)加深印象，有的也許正是你所需要的，就刻意運(yùn)用一下，說不好能讓你豁然開朗，使編程效果事半功倍！

強(qiáng)制聲明變量

Option Explicit

有人覺得VBA的最大好處是不用聲明變量就可以直接使用，可這也會(huì)帶來一些問題，比如先定義一個(gè)變量名為“myVar1”并賦值，但是后面使用的時(shí)候錯(cuò)誤的將變量名寫為“myVarl”，程序執(zhí)行的時(shí)候不會(huì)出現(xiàn)異常，但卻會(huì)導(dǎo)致處理結(jié)果與預(yù)期不符，如果程序一開始加上上面這句代碼，就可以提前發(fā)現(xiàn)這個(gè)問題；

指定數(shù)組起始下標(biāo)

Option Base 1

由于下界的缺省設(shè)置是 0，因此無需使用 Option Base 語句。如果使用該語句，則必須寫在模塊的所有過程之前。一個(gè)模塊中只能出現(xiàn)一次 Option Base，且必須位于帶維數(shù)的數(shù)組聲明之前。

注意 Dim、Private、Public、ReDim 以及 Static 語句中的 To 子句提供了一種更靈活的方式來控制數(shù)組的下標(biāo)。不過，如果沒有使用 To 子句顯式地指定下界，則可以使用 Option Base 將缺省下界設(shè)為 1。使用 Array 函數(shù)或 ParamArray 關(guān)鍵字創(chuàng)建的數(shù)組的下界為 0；Option Base 對(duì) Array 或 ParamArray 不起作用。

Option Base 語句只影響位于包含該語句的模塊中的數(shù)組下界。

忽略錯(cuò)誤

On Error Resume Next

這條語句是用來屏蔽出錯(cuò)信息，當(dāng)出錯(cuò)時(shí)，使得程序繼續(xù)執(zhí)行的，不過在寫程序的時(shí)候，尤其是初學(xué)者寫程序的時(shí)候,很有可能因?yàn)檫@條語句的使用，使你忽略掉程序里隱藏的一些小錯(cuò)誤.所以一定要慎用。

跳轉(zhuǎn)控制

On Error GoTo ErrorLine

出現(xiàn)錯(cuò)誤會(huì)跳到第ErrorLine，激活錯(cuò)誤處理程序，不過需要自己寫錯(cuò)誤處理程序，特別是一些可以預(yù)見到的錯(cuò)誤。

錯(cuò)誤終止

On Error GoTo 0

如果后面的程序出現(xiàn)'運(yùn)行時(shí)錯(cuò)誤'時(shí)，會(huì)顯示'出錯(cuò)信息'并停止程序的執(zhí)行。Err對(duì)象保存了“錯(cuò)誤信息”。

隱藏警告框

Application.DisplayAlerts=False

如果不想在宏運(yùn)行時(shí)被無窮無盡的提示和警告消息所困擾，可加上上面這行代碼，這樣每次出現(xiàn)需用戶應(yīng)答的消息時(shí)，Microsoft Excel 將選擇默認(rèn)應(yīng)答。

如果將該屬性設(shè)置為 False，則在代碼運(yùn)行結(jié)束后，Micorosoft Excel 將該屬性設(shè)置為 True，除非正運(yùn)行交叉處理代碼。

顯示警告框

Application.DisplayAlerts=True

該行代碼常和上面那行組合使用，對(duì)于某些警告框不想顯示將屬性設(shè)置為隱藏，但是對(duì)于某些警告框還想顯示，就需要將屬性重新設(shè)置為true以示顯示。（公眾號(hào)URItker）

關(guān)閉屏幕刷新

Application.ScreenUpdating=False

關(guān)閉 “過程中運(yùn)行時(shí)” 屏幕即時(shí)刷新，禁用屏幕更新可以加快宏代碼的速度。雖然無法實(shí)時(shí)了解宏的最新動(dòng)態(tài)，但它的運(yùn)行速度會(huì)變快。

打開屏幕刷新

Application.ScreenUpdating=True

該句代碼常和上面那行組合使用，當(dāng)宏結(jié)束運(yùn)行后，請(qǐng)記住將 ScreenUpdating 屬性設(shè)置回 True。

創(chuàng)建新工作簿

Workbooks.Add

新建一個(gè)工作表并設(shè)為活動(dòng)工作表。沒什么好說的，也可以加參數(shù)，不過一般用不到，就不多講了，可以找找官方幫助文檔。

未完待續(xù)

THE

END

本站僅提供存儲(chǔ)服務(wù)，所有內(nèi)容均由用戶發(fā)布，如發(fā)現(xiàn)有害或侵權(quán)內(nèi)容，請(qǐng)點(diǎn)擊舉報(bào)。

打開APP，閱讀全文并永久保存查看更多類似文章

【VBA實(shí)例029】使用數(shù)組數(shù)據(jù)排序

VBA編程時(shí)常用的提速方法 >> VBA基礎(chǔ) >> Excel吧

Excel中的VBA代碼你可以寫出來,可是你真的會(huì)優(yōu)化代碼嗎？

Excel VBA 學(xué)習(xí)總結(jié)

完全手冊(cè)Excel VBA典型實(shí)例大全：通過368個(gè)例子掌握

excel的vba數(shù)組 - 中華統(tǒng)計(jì)學(xué)習(xí)網(wǎng)

更多類似文章 >>

免费视频淫片aa毛片_日韩高清在线亚洲专区vr_日韩大片免费观看视频播放_亚洲欧美国产精品完整版