Code VBA pour une fenêtre pop-up :

```vba
Sub ShowMessage()
MsgBox "Ceci est un message d'alerte", vbInformation, "Titre de la fenêtre"
End Sub
``` Solved

Question

Bonjour,  I would like to include a pop-up window opening with the message "please wait..." in a resource-intensive macro in Excel.  Basically, I want a window asking me to wait to open when I launch the macro, while the macro's base function runs normally, and the window automatically disappears once the calculation is finished.  The only thing I have found so far is this: ... warning = MsgBox("This will take time", vbExclamation + vbOKCancel, "WARNING") If warning = vbCancel Then End ...  This command opens a window with the message "This will take time" with an OK button and a Cancel button. If I choose Cancel, the macro stops. If I choose OK, the window closes and the macro runs normally; it is lengthy, and an inexperienced user might think the PC has frozen.  Can you help me?  Thank you in advance.

le père · Accepted Answer

Hello  You cannot use Msgbox because Msgbox is a modal window, which means your application does nothing else until you close it.  Create another window with your message. At the beginning of your macro, you use Autrefenetre.show and at the end Autrefenetre.hide.

chouchen_lolo · Answer

D'accord, j'ai compris le concept. But can you explain to me how to create the window that I will show and hide afterwards?  Thank you

le père · Answer

In VBA, in the project window (usually at the top left by default), you right-click - insert - userform.

le père · Answer

You have the choice UserForm1.show vbModal or userform1.show vbModeless. It's Modeless that interests you, while vbModal is the default.   To change the name, look at the properties window on the left. You can change the name, the title, etc.

Polux31 · Answer

Hello, I didn't know about vbmodeless... I put the code that should be executed in the form_initialize()... I take note for vbmodeless... thank you, dad.  ;o)  Polux

chouchen_lolo · Answer

Hello hello,  Well, I used vbModeless. It works: my waiting window opens properly at the beginning of the macro and closes automatically at the end of the calculation.  However, I have a display problem with the content of the window... Actually, nothing is displayed: the inside of the window is all white instead of being gray with "please wait" written on it.  Do you have any idea where the problem might come from? Here’s the piece of code that opens the window:  Attente.Show vbModeless  Is there something missing to have everything displayed correctly?  Thank you.

le père · Answer

Hello  It's up to you to put this message in the window. When you are in your window in the VBA editor, you should have a small "toolbox" window that allows you to add text, images, buttons, etc. Explore a bit, don't wait for everything from me.

chouchen_lolo · Answer

I don't expect everything from you.  My problem doesn't come from there. I know very well that it's up to me to put the message I want in this window. That's what I did (and before you tell me): in the VBA editor, I used the toolbox to write "please wait..." in my window.  So everything seems fine in VBA. Yet, when I run the macro, the window that appears is empty and white: the text on the gray background that I put in the window in VBA does not appear. It's as if there is a refresh issue.

le père · Answer

Waiting.Show vbModeless immediately followed by Waiting.Repaint

chouchen_lolo · Answer

Everything is working perfectly now.  Thank you very much for everything.  Bye bye

Code VBA pour une fenêtre pop-up : ```vba Sub ShowMessage() MsgBox "Ceci est un message d'alerte", vbInformation, "Titre de la fenêtre" End Sub ```

10 answers

Copy/paste scanned text jpeg format

Startup error message

Black screen on hp pc

Case fan not working

Username and password

How to delete quarantine files in defender?

Taskbar icon visibility

Texture issues in enshrouded

Activation of the esu program for updates on windows 10

Remove marker stain from pc screen