麻辣家族討論版版 » Excel程式區 » 下拉式選單設定

返回列表下一主題上一主題發帖

下拉式選單設定

小學生 Rank: 1

帖子: 4
主題: 2
精華: 0
積分: 6
點名: 0
作業系統: WIN 7
軟體版本: OFFICE 2003
閱讀權限: 10
註冊時間: 2014-5-21
最後登錄: 2014-12-17

1^# 跳轉到 » 正序看帖

字體大小: tT

發表於 2014-12-10 17:21 | 只看該作者

下拉式選單設定

請問各位高手
如何將下拉式選單中的值
正確的帶出

例如：
下拉式選單中有(小明、大同、李四)
點選大同
會將"大同"帶到A1欄位中

收藏

小學生 Rank: 1

帖子: 4
主題: 2
精華: 0
積分: 6
點名: 0
作業系統: WIN 7
軟體版本: OFFICE 2003
閱讀權限: 10
註冊時間: 2014-5-21
最後登錄: 2014-12-17

5^#

發表於 2014-12-17 13:43 | 只看該作者

回復 4# baby520every

如附檔
謝謝

abc.rar (12.5 KB)

小學生 Rank: 1

帖子: 4
主題: 2
精華: 0
積分: 6
點名: 0
作業系統: WIN 7
軟體版本: OFFICE 2003
閱讀權限: 10
註冊時間: 2014-5-21
最後登錄: 2014-12-17

4^#

發表於 2014-12-16 18:03 | 只看該作者

回復 3# GBKEE

TO GBKEE
小弟還是用不出來？
一直出現變數未定義
可否在詳細說明
謝謝

超級版主 Rank: 8 Rank: 8

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

2017 雞年全勤獎章 2016猴年全勤獎章 2015羊年全勤獎章 2014馬年全勤獎章 2013蛇年全勤獎章 2012龍年全勤獎章論壇貢獻勳章熱烈參與勳章 2011兔年全勤獎章

3^#

發表於 2014-12-11 07:04 | 只看該作者

本帖最後由 GBKEE 於 2014-12-11 07:07 編輯

回復 1# baby520every

下拉清單指定巨集的內容

Option Explicit
Sub 下拉清單1_Change()
'可修改 Sheet1 : 工作表物件模組的名稱
With Sheet1.Shapes("下拉清單 1").OLEFormat.Object
Sheet1.[A1] = .List(.Value)
End With
End Sub

複製代碼

感恩的心......(在麻辣家族討論區.用心學習會有進步的)
但資源無限,後援有限, 一天1元的贊助,人人有能力.

中學生 Rank: 2

帖子: 25
主題: 7
精華: 0
積分: 53
點名: 0
作業系統: win7
軟體版本: 2010
閱讀權限: 20
性別: 男
註冊時間: 2014-12-4
最後登錄: 2018-6-6

2^#

發表於 2014-12-10 17:48 | 只看該作者

回復 1# baby520every

這樣??

Range("a1") = ComboBox1.Text

複製代碼

靜思自在 : 君子立恆志，小人恆立志。

返回列表下一主題上一主題