作者jienzau (JIZ)
看板Visual_Basic
標題[VBA ] 自訂表單可以在A電腦跑,到另一台就錯誤
時間Fri Jul 26 08:58:59 2013
小弟我在筆電上寫VBA,要執行自訂表單,可以正確執行
換了另外一台電腦卻出現"執行階段錯誤9,陣列索引超出範圍"
然後使用"偵錯"功能,系統自動跳到這一行:
Sub Button_Click()
→ BiaoDan.Show
End Sub
可是查了網路和手邊VBA的相關書籍,都是這樣寫
因此想說應該是啟動表單時的陣列出了錯或是沒有定義清楚
Private Sub UserForm_Initialize()
Dim items(30) As String
Dim WB As String, WS_TWAX As String
Dim i As Integer, j As Integer
Dim k As Integer
WB = "BMF Zentrum"
WS_TWAX = "TWAX"
j = 1
k = 1
Do While j <= 48
i = 1
Do While i <= 20
items(k) = Workbooks(WB).Sheets(WS_TWAX).Cells(j, i).Value & " " & _
Workbooks(WB).Sheets(WS_TWAX).Cells(j, i + 1).Value
i = i + 4
k = k + 1
Loop
j = j + 8
Loop
Me.ComboBox1.List = items
End Sub
希望各位高手們能幫我解答,同個檔案拿到筆電去試,就是能夠順利開啟表單
並且載入ComboBox1裡面的List,但拿到其他電腦就是不行,拜託各位大大了>"<
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 163.20.153.54
1F:→ tsongs:電腦缺某元件吧 筆電跟電腦環境不一樣 07/26 09:13
2F:推 johnpage:注意office版本 07/26 13:09
3F:→ jienzau:版本都是Office 2010,有辦法知道缺少那些元件嗎? 07/26 13:49
4F:→ tsongs:要看你引用甚麼元件 然後查書 07/26 14:01
5F:→ tsongs:阿 不對 查設定引用元件就可查到 怎找到要先問EXCEL版本 07/26 14:03
6F:→ tsongs:好像是工具>設定引用項目>看哪個打勾 07/26 14:04
7F:→ tsongs:游標點那個元件 下面會有位置 一般是.dll檔 07/26 14:06
8F:→ tsongs:不過我現不是用2010 不一定對 07/26 14:07
9F:→ tsongs:可以到筆電那邊把那個元件打勾 07/26 14:08
10F:推 tsongs:印象中不完整安裝會找不到元件 可直接COPY過去同位置 07/26 14:37
11F:→ jienzau:問題解決了,感謝各位大大^^ 08/01 15:02
12F:→ tsongs:所以是元件嗎 講一下給別人參考 08/01 20:56