EXCEL VBA (已解決，謝謝)

AoLin

AoLin
個人積分：0分
文章編號：64121121

0分

樓主

2017-04-24 8:42

已過期，刪除。

2017-04-24 8:42 發佈

文章關鍵字 EXCEL VBA ComboBox ListBox

snare

snare
個人積分：3051分
文章編號：64141120

3051分

2樓

2017-04-25 19:12

一、
ListBox1_change() 改成 ListBox1_click()

二、這2行不要
Dim s As Integer
s = "'Med'!g2:g5"

三、listbox1 裡面的 Select Case true 改成 Select Case ListBox1.Value

四、listbox1 裡面的 case 1 改成 case "跑" ，其它照作

AoLin

AoLin
個人積分：0分
文章編號：64141809

0分

樓主

2017-04-25 20:31

SNARE , 你好!

先謝謝你的回覆! 感謝!

snare

snare
個人積分：3051分
文章編號：64141947

3051分

4樓

2017-04-25 20:45

Case Sheets(4).Range("g2")

Case Sheets(4).Range("g3")

AoLin

AoLin
個人積分：0分
文章編號：64141981

0分

樓主

2017-04-25 20:49

可以啦!!
之前也試過這樣,, 但一直在後面加.Value , 弄到不行~
謝謝SNARE!! 萬分感激!!