MS Access：将进度条链接到正在运行的宏

Question

我知道这个话题已经讨论了很多，但也许已经有一些改进的解决方案......

我想将进度条链接到我的宏，因此用户将需要等待多长时间才能完成该过程。

是否有任何VBA代码放在宏的顶部或某种方式将进度条链接到它？

由于

Answer 1

我为我的案子找到了一个解决方案......

Private Sub Import_Click()

Me!ProgressBar.Visible = True

Form_frmExcelImportWizard.ProgressBar.Min = 0

Form_frmExcelImportWizard.ProgressBar.Max = 100

Command 1
ProgressBar.Value = 1
Command 2
ProgressBar.Value = 2
'...
Command 100
ProgressBar.Value = 100
Me!ProgressBar.Visible = False

End Sub

Answer 2

您可以使用内置状态工具栏的进度条。以下是一个示例：MSDN: Status Bar Progress Meter