国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 辦公 > Excel > 正文

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

2024-08-23 19:25:52
字體:
供稿:網(wǎng)友

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

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

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

  Option ExplicitPrivate 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列的任意一個單元格(如圖中的D11單元 格),此時就可以看到該列單元格自動展開的數(shù)據(jù)有效性的下拉菜單了,如圖A處。這樣一來我們輸入那些重復(fù)的數(shù)據(jù)就可以比原來更快一步了。有此需求的朋友不 妨一試。

 

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 双城市| 忻城县| 陵水| 洪湖市| 昌图县| 运城市| 屏边| 十堰市| 宁都县| 邵武市| 桂东县| 华池县| 湘西| 福泉市| 七台河市| 于田县| 加查县| 措勤县| 武夷山市| 青州市| 治县。| 昌邑市| 门源| 文安县| 韶山市| 哈密市| 乌拉特前旗| 元江| 维西| 三穗县| 永顺县| 沂南县| 新田县| 盖州市| 涿州市| 株洲县| 台山市| 栾城县| 开封市| 安阳县| 宝山区|