如何讓下拉選單選取後自動跳到儲存格相對應處? - Excel程式區

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

12^#

發表於 2013-11-7 10:11 | 顯示全部帖子

回復 31# c_c_lai

謝謝
這太深奧了，有看沒有懂
假日多一點時間我再來研究

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

13^#

發表於 2013-11-7 11:06 | 顯示全部帖子

回復 34# stillfish00

我下載的檔案裡是沒有設資料驗證清單，所以只要設定了資料驗證清單就執行無誤。

我其中比較不懂的是，既然使用資料驗證清單為何還要用 COMBOBOX 選單，
如果要用 COMBOBOX 選單也設了LIST項目，應該就不需使用資料驗證清單才對，
覺得有點畫蛇添足的感覺

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

14^#

發表於 2013-11-7 15:33 | 顯示全部帖子

回復 38# c_c_lai

我下載你提供的檔案，Sheet2!A欄是沒有設定資料驗證清單，
所以 Worksheet_SelectionChange 判斷所選儲存格沒有設定資料驗證清單，就沒有作用

重設資料驗證清單儲存，在打開仍會存在。

程式中有下面這一段，但都沒有被呼叫，我也沒有仔細研究，所以一直以為VBA應該會將  資料驗證清單自動設好。
Sub CellValidation()    '  stillfish00 提供
With Sheets("Sheet2").[A2:A25].Validation
      .Delete
      .Add Type:=xlValidateList, Formula1:="=Sheet1!$A$3:$A$20"
End With
End Sub

以這例子可能一開始是使用  資料驗證清單，後來改用COMBOBOX來替代資料驗證清單，
讓我一直搞不清楚(VBA功力太弱)，既然使用COMBOBOX來當驗證清單，為何又要設定儲存格的  資料驗證清單，
感覺2個相同功能互疊在一起。
總之謝謝你一直耐心回覆我的問題，感謝

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式

帖子: 2025
主題: 13
精華: 0
積分: 2053
點名: 0
作業系統: WIN7
軟體版本: Office2007
閱讀權限: 100
性別: 男
來自: 台北市
註冊時間: 2011-3-2
最後登錄: 2024-3-14

論壇榮譽勳章論壇贊助勳章熱烈參與勳章 2014馬年全勤獎章 2015羊年全勤獎章 2016猴年全勤獎章

15^#

發表於 2013-11-7 18:03 | 顯示全部帖子

回復 44# c_c_lai

謝謝說明，已經了解問題所在

{...} 表示需要用 CTRL+SHIFT+ENTER 三鍵輸入公式