What is the minimal VBA "I'm busy" dialog?

I have a macro in PowerPoint 2010 that associates audio files with all slides. However, this takes some time, and although there is a β€œfile linking” status bar, I would like something else in your person.

Caution: I am really not familiar with VBA or API.

What I want:

ImBusyDialog("Linking Files...").Open()

// Call Sub that does real work.

ImBusyDialog.Close();

and what is he. If IE has something built like loading a page, then great, if not, I'm happy with the simple message box. The important thing is that it does not require user intervention.

+3
source share
1 answer

, . , .

O'Reilly , . , , , , , , VBA: http://oreilly.com/pub/h/2607

Stackoverflow , , , , : Excel

:

Sub ShowForm_DoSomething()r
Load frmStatus
     frmStatus.Label1.Caption = "Starting"
     frmStatus.Show
     frmStatus.Repaint
'Load the form and set text
     frmStatus.Label1.Caption = "Doing something"
     frmStatus.Repaint
'code here to perform an action
      frmStatus.Label1.Caption = "Doing something else"
     frmStatus.Repaint
'code here to perform an action
      frmStatus.Label1.Caption = "Finished"
     frmStatus.Repaint
     Application.Wait (Now + TimeValue("0:00:01"))
     frmStatus.Hide
     Unload frmStatus 'hide and unload the form
End Sub

O'Reilly, , , " " , , . SO .

+4

All Articles