VBA下拉式選單(已解決) - Excel程式區

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 142
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2026-7-16

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

2^#

發表於 2011-5-17 14:34 | 顯示全部帖子

回復 5# arcticfox

學海無涯_不恥下問

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 142
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2026-7-16

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

3^#

發表於 2011-5-19 14:53 | 顯示全部帖子

動態定義範圍的名稱，最大的好處就在於可以因應資料量成長
請注意圖檔中定義名稱的公式
定義好名稱後，在VBA只需引用該名稱就能指定到該範圍
RowSource屬性必須在屬性表內設定
LIST屬性可於表單初始化的同時，將下拉清單的LIST屬性設為該名稱就能使用

Private Sub UserForm_Initialize()
ComboBox1.List = [x].Value
End Sub

複製代碼

學海無涯_不恥下問

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 142
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2026-7-16

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

4^#

發表於 2011-5-19 16:03 | 顯示全部帖子

本帖最後由 Hsieh 於 2011-5-19 17:09 編輯

你的Sales所定義出來的會是甚麼?
INDEX
會傳回根據欄列號碼索引所選取之表格或陣列中一個元素的值。
他是一個值，並不是一個陣列或是儲存格參照
當然無法當成LIST
不過應可設成RowSource
你的問題似乎不是在於如何設定下拉清單
而是變數給值的問題
你的客戶選擇後要對應Sales
MATCH(專案紀錄!$C$2:$C$1000, 客戶資料管理!$A$2:$A$1000,0)這是要得到甚麼資料?
我想你應該從定義名稱公式去檢查

學海無涯_不恥下問

帖子: 4901
主題: 44
精華: 24
積分: 4916
點名: 142
作業系統: Windows 7
軟體版本: Office 20xx
閱讀權限: 150
性別: 男
來自: 台北
註冊時間: 2010-4-30
最後登錄: 2026-7-16

2025年全勤獎章 2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱心公益勳章 2011兔年全勤獎章

5^#

發表於 2011-5-19 17:09 | 顯示全部帖子

先看這句
Sales_P.FormulaR1C1 = "=Sales"
在這句之前你有將Sales_P給值嗎?
FormulaR1C1 屬性是儲存格的公式
這儲存格變數必須先SET
Set Sales_P=儲存格
Sales_P.FormulaR1C1 = "=Sales"
這樣才會成立，不然Sales_P是Nothing
我猜你是要把Sales_P指定成名稱Sales
那麼就用Set Sales_P=[Sales]
這純粹猜測，要了解你的思路才能給你正確方向

學海無涯_不恥下問