【发布时间】:2016-02-25 15:24:17
【问题描述】:
Excel 2013 32bit / Access 2013 32bit / Win 7 64bit
进度条码:
Sub progress(pctCompl As Single)
If pctCompl = 100 Then
Unload ProgressBar
Exit Sub
End If
ProgressBar.Text.Caption = pctCompl & "% Completed"
ProgressBar.Bar.Width = pctCompl * 2
DoEvents
End Sub
启动器编码器:
Sub LaunchPBUF()
ProgressBar.Show '<-- Error Location
End Sub
我做了什么:
- 从 Excel 导出用户表单并导入 Access
- 注意到带有 .frm 导入的 .frx 文件,无法确保正在导入 .frx
- 从 Access 中删除用户表单并在 Access 中重新创建
- 按照此处的说明进行操作
- 右键单击“工具”并自定义工具栏以添加用户表单命令
- 用户表单设计:http://www.excel-easy.com/vba/examples/progress-indicator.html
【问题讨论】:
-
我不太明白 - 您是否创建了常规的 Access 表单,或者 Access 中通常不存在的“用户表单”?
-
一个用户表单,我以两种方式创建它 - 首先是从 Excel 导入它,其次是在 Access 中实际创建它,如原始问题中的上述链接所述。
-
我明白了。我强烈建议使用“本机”访问表单,几乎没有人在 Access 中使用用户表单。或者使用SysCmd创建一个没有表单的进度条。
-
那行得通,安德烈,把它作为答案,我会选择它。谢谢,
标签: ms-access vba runtime-error userform