Excel錄入中實現(xiàn)單元格多選項自動下拉

【摘要】環(huán)球網(wǎng)校整理的“Excel錄入中實現(xiàn)單元格多選項自動下拉”，針對在Excel使用中實現(xiàn)單元格多選項自動下拉的處理，希望對大家學習財務(wù)軟件-Excel，用其進行做賬有所幫助，網(wǎng)校還會繼續(xù)更新更多財務(wù)軟件的應(yīng)用技巧等相關(guān)資料，供大家學習會計知識，敬請關(guān)注環(huán)球會計實訓頻道!

 　相關(guān)推薦：如何單獨打印Excel指定區(qū)域

　　我們在Excel表格中需要輸入大量的重復數(shù)據(jù)時，往往利用數(shù)據(jù)的有效性來制作一個下拉菜單以提高重復數(shù)據(jù)的輸入速度。但在實際的操作過程中，必須選中需要輸入重復數(shù)據(jù)的單元格并單擊該單元格右邊的下拉箭頭，才可以看到自己事先定制的數(shù)據(jù)有效性的下拉菜單。那么，能否實現(xiàn)在選中Excel單元格時自動展開數(shù)據(jù)有效性的下拉菜單以使得重復數(shù)據(jù)的輸入更快一步呢?詳情如下：

　　先啟動Excel 2003并打開某個已設(shè)置好數(shù)據(jù)有效性下拉菜單的工作簿(如“工資表.xls”)，然后單擊菜單“工具→宏→Visual Basic 編輯器”命令，調(diào)出“Visual Basic 編輯器”;接著在“Visual Basic 編輯器”窗口中，雙擊“工程 - VBAPRoject”面板中的“Sheet1(*)”選項(*為當前需要快速輸入重復數(shù)據(jù)的工作表)，在彈出的代碼窗口中輸入以下代碼：

　　Option Explicit

　　Private Sub Worksheet_SelectionChange(ByVal Target As Range)

　　If Target.Column = 3 Then application.SendKeys “%{down}”

　　If Target.Column = 4 Then Application.SendKeys “%{down}”

　　End Sub

　　上述代碼輸入完畢后，關(guān)閉“Visual Basic 編輯器”窗口，此時我們輸入的代碼就會自動保存。

　　小提示：代碼的含義是當我們選中第3列、第4列(即C列和D列)的任意一個單元格時，都會自動展開數(shù)據(jù)有效性的下拉菜單。在實際的操作過程中，大家可靈活地修改這兩個自然數(shù)以滿足自己的需要。

　　完成上述操作后，關(guān)閉“工資表.xls”并保存對其所做的修改，然后重新打開它，接著選中C列或D列的任意一個單元格，此時就可以看到該列單元格自動展開的數(shù)據(jù)有效性的下拉菜單了。這樣一來我們輸入那些重復的數(shù)據(jù)就可以比原來更快一步了。有此需求的朋友不妨一試。

　　環(huán)球網(wǎng)校友情提示：如果您在學習過程中遇到任何疑問 ，請登錄環(huán)球網(wǎng)校會計實踐操作論壇，隨時與廣大考生朋友們一起交流!

　　會計必備知識 | 會計提升 | 財務(wù)軟件運用技巧