作者jienzau (JIZ)
看板Visual_Basic
标题[VBA ] 自订表单可以在A电脑跑，到另一台就错误
时间Fri Jul 26 08:58:59 2013
小弟我在笔电上写ＶＢＡ，要执行自订表单，可以正确执行
换了另外一台电脑却出现"执行阶段错误9，阵列索引超出范围"
然後使用"侦错"功能，系统自动跳到这一行：
Sub Button_Click()
→ BiaoDan.Show
End Sub
可是查了网路和手边ＶＢＡ的相关书籍，都是这样写
因此想说应该是启动表单时的阵列出了错或是没有定义清楚
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