日韩黑丝制服一区视频播放|日韩欧美人妻丝袜视频在线观看|九九影院一级蜜桃|亚洲中文在线导航|青草草视频在线观看|婷婷五月色伊人网站|日本一区二区在线|国产AV一二三四区毛片|正在播放久草视频|亚洲色图精品一区

分享

Excel VBA工作薄 6.1 設(shè)置個性化彈窗 提示更加醒目、溫馨

 Excel和VBA 2021-03-31

前景提要

經(jīng)過了大半個月的學(xué)習(xí),我們算是成功的完結(jié)了工作薄的相關(guān)知識的分享和說明,到此第5系列告一段落了,之后將會分享一些工作表的一些操作方法,但是最近幾天身體有點不舒服,還沒有構(gòu)思好,暫時先和大家說下比較簡單的msgbox彈窗的幾種用法吧,希望能夠?qū)Υ蠹矣兴鶐椭?,最近也在做一版匯總,先做第一系列的匯總,到時候分享給大家,到時候還期待大家多多捧場支持~~

場景模擬

今天我們來說點比較簡單入手的彈窗功能吧,彈窗功能大家都比較的熟悉了,在excel中彈窗時出現(xiàn)比例最多的事件了,比方說你文件沒有報錯就執(zhí)行了關(guān)閉

或者各種不合規(guī)矩的操作,比方說你寫了宏,但是保存的時候還是用普通格式保存,excel也會提醒你一下,免得你代碼全部沒有了。

彈窗可以理解為腳本/代碼編寫者和使用者之間的一個交互,腳本/代碼編寫者通過彈窗給用戶提醒或者警示,用戶根據(jù)腳本/代碼編寫者的彈窗來進(jìn)行相應(yīng)的操作,形成一種交互

在VBA中,彈窗可以實現(xiàn)兩種功能,一種就是常見的提醒或者警示,另外一種就是交互,我們本節(jié)先來分享下簡單的提醒或者警示的寫法

代碼區(qū)

假設(shè)我們來一個提醒功能,在工作薄關(guān)閉的時候,提示用戶,你正在關(guān)閉數(shù)據(jù)。一個很簡單的彈窗

Private Sub Workbook_BeforeClose(Cancel As Boolean) MsgBox "你即將關(guān)閉工作薄", vbInformation, "關(guān)閉提醒"End Sub

看看效果

相對于前面excel展示的提示窗口就簡單了很多了,關(guān)鍵字段也減少了很多,清晰簡單的表達(dá)了我們想要表達(dá)的內(nèi)容

代碼分析

今天的代碼很簡單我,我們來說下幾個參數(shù)的不同的作用

最精簡版

MsgBox "你即將關(guān)閉工作薄"


窗體標(biāo)題是默認(rèn)的,也沒有任何的圖標(biāo)提醒,看起來非常的生硬

進(jìn)階版

MsgBox "你即將關(guān)閉工作薄", vbInformation


相對于之前出現(xiàn)了一個藍(lán)色的感嘆號的圖標(biāo),多了一點色彩,稍微人性化一點了,不過感覺提醒窗口的話,應(yīng)該是黃色的感嘆號比較醒目點,我們來修改下

Private Sub Workbook_BeforeClose(Cancel As Boolean) MsgBox "你即將關(guān)閉工作薄", vbExclamation, "關(guān)閉提醒"End Sub


有黃色警示標(biāo)識,窗體也增加了標(biāo)題,這樣表達(dá)的更加溫馨,人性化,那么彈窗做的這樣完美,有什么用處呢?下節(jié)我們將分享下利用彈窗來進(jìn)行和用戶/使用者之間的交互,通過使用者做出的不同選擇來執(zhí)行不同的命令。敬請期待

    轉(zhuǎn)藏 分享 獻(xiàn)花(0

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多