返回列表 上一主題 發帖

請教下拉式選單的問題

請教下拉式選單的問題

請教EXCEL下拉式選單,
第一層可選甲、乙、丙、丁,
第二層依照第一層所選的條件可選擇:
甲-A1、A2、A3、A4
乙-B1、B2、B3、B4
丙-C1、C2、C3、C4
丁-D1、D2、D3、D4
以上已製作完成,並可執行。

如第一層選甲,第二層則選A1。
如再回第一層將(甲)改選成(乙),
沒再做第二層選擇的動作則第二層的A1並不會變動,如未注意可能造成資料錯誤,
請教如何製作第一層與第二層資料錯誤時的顯示(提示),
或修改第一層時第二層也會變成空白。
還請高手解答,謝謝。

1.rar (3.47 KB)

論壇裡真是高手如雲,
我想應該快要達到我想要的東西了,
感覺越做越複雜也越有興趣了。
感謝各位不吝指導與詳細解說,
小弟還要花點時間研究、消化一下,
畢竟功力還是太淺了,
如果還有問題還請各位前輩不吝指導。
真希望我以後也有能力在論壇裡幫同學回答問題。
謝謝了。

TOP

本帖最後由 Hsieh 於 2010-8-5 19:27 編輯

回復 7# barry2266b
點選在B1
定義名稱X
=OFFSET(工作表3!$A$1,MATCH(工作表1!$A1,工作表3!$A:$A,0)-1,1,,5)

選取B欄
設定格式化條件
=(B1<>"")*ISERROR(MATCH(B1,X,0))
格式將字型顏色設為跟底色相同   
學海無涯_不恥下問

TOP

回復 7# barry2266b
=OR(AND($A1<>"",ISERROR(MATCH($B1,INDIRECT($A1),0))),AND($A1="",$B1<>""))
多範圍設定格式化條件 要注意    上面的公式  作用中的儲存格在 A1或B1  第一列
如   作用中的儲存格在 A5或B5 為第五列   要改成下面的公式
=OR(AND($A5<>"",ISERROR(MATCH($B5,INDIRECT($A5),0))),AND($A5="",$B5<>""))
以此類推

TOP

回復 6# asimov


謝謝各位高手熱心回覆,
表格做好後又發現問題了,
以設定格式化條件帶入公式後,
未填選的儲存格呈紅色(表示資料錯誤),
如何做才能使未填選的儲存格呈白色呢?
感謝解答。

擷取.JPG (20.02 KB)

擷取.JPG

TOP

以設定格式化條件帶入公式,如整欄都需要有此提示的功能要如何做?
...
barry2266b 發表於 2010-8-4 21:41



選取欄範圍,在格式化條件輸入公式
注意 $ 絕對符號的應用
選取範圍一次完成設定
機器人三大定律-保護人類、服從命令、保護自己
我的三大定律-生命、生存、生活

TOP

哇!終於有高手出手相助了,太高興了,
加入這個論壇真好,有好多東西可學了。
再請教,
以設定格式化條件帶入公式,如整欄都需要有此提示的功能要如何做?
用拖曳的好像不行,如要一格一格的修改設定好像很笨又花時間,
菜鳥虛心請教了,感謝高手回覆。

TOP

回復 1#barry2266b  請教如何製作第一層與第二層資料錯誤時的顯示(提示),
選定 A1:B1 範圍
指令->設定格式化條件    公式=ISERROR(MATCH($B$1,INDIRECT($A$1),0))
如圖:

或修改第一層時第二層也會變成空白。     要動到VBA
請看針對 A1:B1 範圍 的程式
Sheet1(工作表1) 的程式碼 如下
  1. Private Sub Worksheet_Change(ByVal Target As Range)
  2. Application.EnableEvents = False
  3. If Application.IsError(Application.Match(Range("B1"), Sheet2.Range([A1]), 0)) Then [B1] = ""
  4. Application.EnableEvents = True
  5. End Sub
複製代碼

TOP

在阿吉大的部落格研究了一下午還是找不到答案,
應該是功力太淺了,
還是感謝阿吉大的熱心回復了,
再找找其他的方法了。

TOP

Hung-Chi Lin/林宏吉
HUNGCHILIN/林宏吉的OFFICE專欄

TOP

        靜思自在 : 信心、毅力、勇氣三者具備,則天下沒有做不成的事。
返回列表 上一主題