Status bar

  • Thread starter Thread starter Luis
  • Start date Start date
L

Luis

In Excel VBA I can use within a For..Next the
Application.StatusBar method to display some information.
Normally I use this method to monitor the progress of the
running module.
Is this possible to do in Access VBA?
 
Hi Luis,

use the syscmd function...

Sub progressStatus()
Dim lngStatus As Long
Dim lngMax As Long

lngMax = 1000

SysCmd acSysCmdInitMeter, "Complete...", lngMax

For lngStatus = 1 To lngMax
SysCmd acSysCmdUpdateMeter, lngStatus
DoEvents
Next lngStatus

SysCmd acSysCmdClearStatus
End Sub

Luck
Jonathan
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Back
Top