返回列表 上一主題 發帖

請教下拉式選單的問題

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
1# 跳轉到 »
發表於 2010-8-4 17:06 | 顯示全部帖子
回復 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

GBKEE

帖子
5923 
主題
13 
精華
1 
積分
5986 
點名
0  
作業系統
win10 
軟體版本
Office 2010 
閱讀權限
150 
性別
男 
來自
台灣基隆 
註冊時間
2010-5-1 
最後登錄
2022-1-23 

2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章2011兔年全勤獎章
2#
發表於 2010-8-5 17:18 | 顯示全部帖子
回復 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

        靜思自在 : 世上有兩件事不能等：一、孝順 二、行善。
返回列表 上一主題