【VBA】用戶窗體日期控件輸入日期,下拉列表輸入指定項(xiàng)目
當(dāng)前位置:點(diǎn)晴教程→知識(shí)管理交流
→『 技術(shù)文檔交流 』
內(nèi)容提要
1、UserForm1,我們調(diào)整了用戶窗體的布局,增加了一個(gè)“新增”按鈕,本來還增加了一個(gè)“保存”按鈕,用于新增項(xiàng)目的保存,后來發(fā)現(xiàn)也沒有必要,我們編輯新增項(xiàng)目的各列數(shù)據(jù),則會(huì)自動(dòng)保存。
2、UserForm2,用來實(shí)現(xiàn)下拉列表輸入,上面有一個(gè)復(fù)合框,一個(gè)確定命令按鈕:
3、日期控件的用戶窗體復(fù)制過來。 1、增加一張工作表“姓名”,用來存放姓名列表:
2、工作表Settings修改了一下,增加了兩個(gè)項(xiàng)目,用于下拉列表輸入: 1、我們在用戶窗體啟動(dòng)時(shí),把姓名、性質(zhì)、狀態(tài)分別裝入對應(yīng)的字典。 2、當(dāng)我們點(diǎn)擊ListView,顯示InkEdit控件,這時(shí),我們雙擊InkEdit控件,根據(jù)所在列的不同,分別顯示日期控件、UserForm2用戶窗體,在UserForm2中,combobox的List隨之變化。 3、當(dāng)我們在InkEdit中輸入內(nèi)容,不管是日期控件錄入、還是下拉列表錄入,還是手工錄入,我們都會(huì)檢查錄入數(shù)據(jù)的有效性,日期列應(yīng)為日期格式,金額列應(yīng)為數(shù)字,姓名、性質(zhì)、狀態(tài)應(yīng)包括在指定的列表中。 完整代碼文本,詳見另一條推文。 1、如果數(shù)據(jù)量大,全部加載到ListView會(huì)很慢,解決方法有幾種: (1)逐步加載,窗體啟動(dòng)時(shí),只加載前面幾條數(shù)據(jù),當(dāng)向下拖動(dòng)滾動(dòng)條時(shí),再加載一部分,可以實(shí)現(xiàn),但我覺得意義不大(主要還是比較麻煩)。 (2)根據(jù)篩選條件,加載滿足一個(gè)條件的數(shù)據(jù),比如月份,我們可以加載最近一個(gè)月份的數(shù)據(jù),如果要查看其他月份,我們在復(fù)合框中選擇即可。這個(gè)方法我比較喜歡,也是經(jīng)常用的。 (3)通過禁止屏幕刷新之類的方法,加快運(yùn)行速度。這種方法有時(shí)候有效,但在今天這個(gè)案例中基本沒什么效果。 (4)把原始數(shù)據(jù)存到數(shù)據(jù)庫里,因?yàn)椋绻麛?shù)據(jù)量大,整個(gè)EXCEL的運(yùn)行速度都會(huì)受到影響。 2、這兩天有點(diǎn)忙,一方面年底了,事情比較多;另一方面,接了一個(gè)小活,是關(guān)于行政事業(yè)單位年終決算報(bào)表批量導(dǎo)入的,根據(jù)從系統(tǒng)中導(dǎo)出來的“可執(zhí)行指標(biāo)執(zhí)行情況表”數(shù)據(jù),以及“2024決算統(tǒng)計(jì)表 (導(dǎo)入模板)”,生成可導(dǎo)入的報(bào)表數(shù)據(jù),一次性導(dǎo)入報(bào)表系統(tǒng),可以極大地減輕行政事業(yè)單位財(cái)務(wù)人員編制決算統(tǒng)計(jì)表的壓力。 據(jù)說這套報(bào)表是全國統(tǒng)一的,如果有這方面需求的朋友可以聯(lián)系定制。 3、關(guān)于WPS報(bào)錯(cuò)的問題,我們在「WPS支持64位的VBA代碼啦?」一文中更正了BUG,但仍然是只適用64位的,這次增加了支持32位的代碼,主要是API函數(shù)與變量聲明方面,但我沒有32位的環(huán)境,沒法測試,也不知能不能正常運(yùn)行。 4、還有其他一些細(xì)節(jié)方面的更新,就不一一說明了。 閱讀原文:原文鏈接 該文章在 2025/2/5 17:02:58 編輯過 |
關(guān)鍵字查詢
相關(guān)文章
正在查詢... |