CODEWITHSUNDEEP
shellvbscriptwsh
Arup Rakshit
Arup Rakshit

Reputation: 118271

Automatically close MsgBox in vbscript?

I am using VBScript to code some automation on excel. I have a MsgBox() within the code, and am looking for a way to close the pop-up window created by MsgBox() automatically without human intervention. Program execution would continue from there.

Upvotes: 4

Views: 50689

Answers (2)

Ekkehard.Horner
Ekkehard.Horner

Reputation: 38745

The pure VBScript solution is the .PopUp method.

Upvotes: 6

bonCodigo
bonCodigo

Reputation: 14361

My comment has provided you tips to search and find out feasible answers. However to save your time, here is some insights.

  • This post shows how you may manupulate MSGBOX in VB.

  • Here is the best possible way anyone could think of in terms of VBA.

    1. Create a form
    2. Use it as a MSGBOX
    3. Add a timer
    4. Given an elapsed time (idle) close the form.

--

  • Another method Reference. This uses a Pop-Up box as the MSGBOX.

Code:

Sub Test1()
 Dim AckTime As Integer, InfoBox As Object

 Set InfoBox = CreateObject("WScript.Shell")
 AckTime = 3
 Select Case InfoBox.Popup("Click OK or do nothing within 3 seconds.", _
 AckTime, "This is your Message Box", 0)

 Case 1, -1
  Exit Sub
 End Select
End Sub

Upvotes: 4

Related Questions