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

EXCEL VBA下拉式選單之問題

Duck

小學生 Rank: 1

帖子: 18
主題: 6
精華: 0
積分: 24
點名: 0
作業系統: w8
軟體版本: office2010
閱讀權限: 10
性別: 女
註冊時間: 2014-3-17
最後登錄: 2014-10-5

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-7-8 11:43 | 只看該作者

EXCEL VBA下拉式選單之問題

請問大大們，下圖的語法哪裡有錯誤嗎?為何下拉式選項上沒有我所打的那些選項??
javascript:;javascript:;

之後還想請教一下，語法上我需要如何撰寫，才能讓我假如在下拉式選單上選了"1749"這個選項，然後按下確定鈕時，可以顯示下圖中B欄位中"1749"的所有資料

javascript:;

下圖是希望顯示出來的資料
javascript:;

懇請各位大大幫忙在下，感激不已~~

擷取1.PNG (12.76 KB)

擷取2.PNG (3.86 KB)

擷取2.PNG

擷取3.PNG (15.86 KB)

擷取4.PNG (6.73 KB)

擷取4.PNG

樓主熱帖

小華

小學生 Rank: 1

帖子: 36
主題: 8
精華: 0
積分: 44
點名: 0
作業系統: win 7
軟體版本: office 2007
閱讀權限: 10
性別: 男
註冊時間: 2013-1-8
最後登錄: 2020-10-29

2^#

發表於 2014-7-8 20:23 | 只看該作者

Private Sub UserForm_Activate()
Set x = Sheets("工作表1")
For i = 2 To 20
      If x.Cells(i, 2) <> "" Then
         ComboBox1.AddItem x.Cells(i, 2)
      End If
Next i
End Sub

試試看用這段程式碼

TOP

Duck