實(shí)例給出Excel級(jí)聯(lián)菜單_第1頁(yè)
實(shí)例給出Excel級(jí)聯(lián)菜單_第2頁(yè)
實(shí)例給出Excel級(jí)聯(lián)菜單_第3頁(yè)
全文預(yù)覽已結(jié)束

下載本文檔

版權(quán)說(shuō)明:本文檔由用戶提供并上傳,收益歸屬內(nèi)容提供方,若內(nèi)容存在侵權(quán),請(qǐng)進(jìn)行舉報(bào)或認(rèn)領(lǐng)

文檔簡(jiǎn)介

實(shí)例給出Excel級(jí)聯(lián)菜單(多個(gè)下拉選項(xiàng))的實(shí)現(xiàn)大家知道,在Excel中可以通過(guò)設(shè)置數(shù)據(jù)的有效性來(lái)實(shí)現(xiàn)類(lèi)似于網(wǎng)頁(yè)表單中的下拉菜單功能,這樣可以大大地提高數(shù)據(jù)的錄入速度和可靠性。但采用此方法要求下拉菜單中的選項(xiàng)不能過(guò)多,否則會(huì)影響錄入的速度。如果這些選項(xiàng)內(nèi)容之間可進(jìn)行分類(lèi)、分組,那我們就可以用多個(gè)下拉選項(xiàng)(即級(jí)聯(lián)菜單)來(lái)解決此類(lèi)問(wèn)題。下面我們就從一個(gè)出發(fā),給出在Excel中實(shí)現(xiàn)級(jí)聯(lián)菜單的兩種方法,希望能給使用Excel進(jìn)行辦公的朋友提供幫助。一、自定義數(shù)據(jù)的有效性這里有兩個(gè)工作表,其中Sheetl用來(lái)采集客戶資料,并將其名稱(chēng)改為“客戶數(shù)據(jù)采集”,在Sheet2的A列中保存了所有的省份,B列中的數(shù)據(jù)為各省份所屬的縣市并將工作表名稱(chēng)改為“地區(qū)”(假設(shè)這里設(shè)置了三個(gè)省份,即江蘇省、浙江省和安徽?。6x單元格區(qū)域名稱(chēng)選中“地區(qū)”表中江蘇省所屬縣市的單元格區(qū)域B2:B14,依次單擊“插入”菜單中的“名稱(chēng)”,選擇“定義”,彈出“定義名稱(chēng)”對(duì)話框,在“在當(dāng)前工作簿中的名稱(chēng)”框中輸入所定義的名稱(chēng)“江蘇”,單擊“確定”按鈕。類(lèi)似地,我們可以將浙江省和安徽省所屬縣市的單元格區(qū)域名稱(chēng)分別定義為“浙江”和“安徽”。設(shè)置數(shù)據(jù)的有效性切換到“用戶數(shù)據(jù)采集”表中,選擇要選擇輸入省份的D歹L單擊"數(shù)據(jù)”菜單中的“有效性”命令,彈出設(shè)置“數(shù)據(jù)有效性”對(duì)話框,在有效性條件的“允許”列表中選擇“序列”,在“來(lái)源”框中輸入“江蘇,浙江,安徽”(分隔符為英文狀態(tài)下的逗號(hào)),單擊“確定”按鈕。接下來(lái)選中“所屬縣市”所在的E列,再次打開(kāi)“數(shù)據(jù)有效性”對(duì)話框,在有效性條件的“允許”列表中選擇“序列”,在“來(lái)源”框中輸入公式“=INDIRECT(D2)”,單擊“確定”按鈕Cico提示:在關(guān)閉設(shè)置E列數(shù)據(jù)有效性對(duì)話框時(shí),如系統(tǒng)彈出警告提示'源目前包含錯(cuò)誤,是否繼續(xù)?”,只需確認(rèn)就可以了。如果指定的D2單元格中已經(jīng)選擇了一個(gè)省份再設(shè)置E列數(shù)據(jù)的有效性就不會(huì)出現(xiàn)此提示了。數(shù)據(jù)錄入錄入客戶資料時(shí),首先選擇客戶所在的省份,然后再打開(kāi)其右側(cè)'所屬縣市”所在的單元格時(shí),我們就可以從下拉菜單中找到我們所需的選項(xiàng)了。二、用組合框工具實(shí)現(xiàn)該方法是借助控件工具箱和VBA代碼來(lái)實(shí)現(xiàn)的。設(shè)計(jì)組合框在工作表Sheetl中我們借助“控件工具箱”設(shè)計(jì)了錄入界面,將工作表名稱(chēng)改為'客戶數(shù)據(jù)采集”,在采集客戶的所屬地區(qū)時(shí)我們?cè)O(shè)計(jì)了兩個(gè)組合框,第一個(gè)組合框ComboBoxl用來(lái)存放省份,第二個(gè)組合ComboBox2用來(lái)存放對(duì)應(yīng)于第一個(gè)組合框的下屬的縣市。Sheet2("地區(qū)”表)仍保留和原來(lái)一樣的內(nèi)容。編寫(xiě)組合框事件代碼雙擊“客戶數(shù)據(jù)采集”表中的組合框ComboBox1,進(jìn)入VBE編輯器,在代碼窗口中輸入其GotFocus事件代碼:PrivateSubComboBox1_GotFocus()'清除組合框中的數(shù)值ComboBox1.ClearComboBox2.Clear'讀出"地區(qū)"表A列中的不同省份并將其添加到組合框1中Fori=2ToSheet2.[a1].End(xlDown).Rowtarget=Sheet2.Cells(i,1)'利用設(shè)置標(biāo)志位要判斷數(shù)據(jù)是否重復(fù)flag=0Forj=0ToComboBoxl.ListCount-1IfComboBox1.List(j)=targetThenflag=1NextIfflag=0ThenComboBox1.AddItemtargetEndIfNextEndSub返回Excel工作表中,雙擊組合框ComboBox2,在代碼窗口中輸入其GotFocus事件代碼:PrivateSubComboBox2_GotFocus()ComboBox2.Clear'讀出"地區(qū)"表B列中屬于組合框1的縣市并將其添加到組合框2中Fori=2ToSheet2.[a1].End(xlDown).Rowtarget=Sheet2.Cells(i,1)Iftarget=ComboBox1.ValueThenComboBox2.AddItemSheet2.Cells(i,2)EndIfNextEndSub運(yùn)行效果返回“客戶數(shù)據(jù)采集”表,單擊控件工具箱中的“退出設(shè)計(jì)模式”按鈕即可進(jìn)入運(yùn)行模式。在組合框ComboBox1中選擇一個(gè)省份,此時(shí)再單擊組合框ComboBox2的下拉按鈕時(shí),我們就可以方便地選擇該省份所屬的縣市了。Cico提示:除了在工作表中實(shí)現(xiàn)客戶的數(shù)據(jù)采集外,我們還可以通過(guò)窗體來(lái)實(shí)現(xiàn)此操作的錄入界面。如果我們需要更改組合框中的列表選項(xiàng),只需在“地區(qū)”表(即Sheet2)中進(jìn)行相應(yīng)的更改就可以了。兩種方法的比較:相比之下,用本文提供的第一種方法比較簡(jiǎn)單,更適合于初學(xué)者和一般用戶。而第二方法則更適合利用Excel進(jìn)行二次開(kāi)發(fā)的讀者朋友,以便于設(shè)計(jì)人性化的數(shù)據(jù)錄入界面。另外,在本例中,“地區(qū)”表中的地區(qū)數(shù)據(jù)如果需要添加或刪除,若用第一種方法實(shí)現(xiàn),要求添加的同類(lèi)數(shù)據(jù)必須要連續(xù)且需要重新定義單元格區(qū)域。如果用方法二實(shí)現(xiàn),各省份和所屬縣市添加時(shí)可以連續(xù)也可以不連續(xù),就這一點(diǎn)而言,比第一種方法要便捷多了。相信大家在耐心地看完本文以后已經(jīng)掌握了這兩種在Excel中制作級(jí)聯(lián)菜單的方法,只要進(jìn)行簡(jiǎn)單的變通,就可以將本文所介紹的技巧應(yīng)用到其他類(lèi)似的場(chǎng)合,去解決我們?nèi)粘^k公中遇到的問(wèn)題。站點(diǎn)簽名:世紀(jì)家園原文地址:/bbslist.asp7Idn1306怎樣在excel中利用有效性序列建立二級(jí)下拉菜單懸賞分:10-解決時(shí)間:2006-5-513:13比如在A列中選擇部門(mén)名稱(chēng),B列中的選擇菜單自動(dòng)會(huì)變成該部門(mén)下所有員工問(wèn)題補(bǔ)充:?jiǎn)栴}一樣。那答案呢?madm的二級(jí)下拉菜單的公式如何運(yùn)用。。能否發(fā)文件上來(lái)提問(wèn)者:superaoyi-試用期一級(jí)最佳答案試試、看看,是否所需!設(shè)置“數(shù)據(jù)”表A歹UB歹U部門(mén)員工A張三李四B王二鄭大C劉一王五D初一趙錢(qián)命名:選中A列,在“名稱(chēng)框”中輸入“部門(mén)”,回車(chē)確認(rèn)。選中B歹U,在“名稱(chēng)框”中輸入“員工”,回車(chē)確認(rèn)。在“菜單”表制作下拉菜單:制作一級(jí)下拉菜單選中A1:B1單元格區(qū)域;執(zhí)行“數(shù)據(jù)/有效性”命令,打開(kāi)“數(shù)據(jù)有效性”對(duì)話框;在“設(shè)置”選項(xiàng)卡下,“允許”選擇“序列”、“來(lái)源”中輸入“部門(mén),員工”(不含引號(hào),用英文逗號(hào)分隔);選中“忽略空值”、“提供下拉箭頭”,單擊“確定”按鈕,完成一級(jí)下拉菜單制作。此時(shí)在A1、B1中,單擊右側(cè)的下拉按鈕進(jìn)行選擇輸入。制作二級(jí)下拉菜單從A2單元格起向下選中單元格區(qū)域;執(zhí)行“數(shù)據(jù)/有效性”命令,打開(kāi)“數(shù)據(jù)有效性”對(duì)話框;在“設(shè)置”中,“允許”選擇“序列”、“來(lái)源”中輸

溫馨提示

  • 1. 本站所有資源如無(wú)特殊說(shuō)明,都需要本地電腦安裝OFFICE2007和PDF閱讀器。圖紙軟件為CAD,CAXA,PROE,UG,SolidWorks等.壓縮文件請(qǐng)下載最新的WinRAR軟件解壓。
  • 2. 本站的文檔不包含任何第三方提供的附件圖紙等,如果需要附件,請(qǐng)聯(lián)系上傳者。文件的所有權(quán)益歸上傳用戶所有。
  • 3. 本站RAR壓縮包中若帶圖紙,網(wǎng)頁(yè)內(nèi)容里面會(huì)有圖紙預(yù)覽,若沒(méi)有圖紙預(yù)覽就沒(méi)有圖紙。
  • 4. 未經(jīng)權(quán)益所有人同意不得將文件中的內(nèi)容挪作商業(yè)或盈利用途。
  • 5. 人人文庫(kù)網(wǎng)僅提供信息存儲(chǔ)空間,僅對(duì)用戶上傳內(nèi)容的表現(xiàn)方式做保護(hù)處理,對(duì)用戶上傳分享的文檔內(nèi)容本身不做任何修改或編輯,并不能對(duì)任何下載內(nèi)容負(fù)責(zé)。
  • 6. 下載文件中如有侵權(quán)或不適當(dāng)內(nèi)容,請(qǐng)與我們聯(lián)系,我們立即糾正。
  • 7. 本站不保證下載資源的準(zhǔn)確性、安全性和完整性, 同時(shí)也不承擔(dān)用戶因使用這些下載資源對(duì)自己和他人造成任何形式的傷害或損失。

最新文檔

評(píng)論

0/150

提交評(píng)論