ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Saving files. Please wait. (https://www.excelbanter.com/excel-programming/352997-saving-files-please-wait.html)

sungen99[_65_]

Saving files. Please wait.
 

A little help again please. I need a macro that will

Display a message box saying “Please wait saving files…..”

Save the active file (I know how to do this)

Close the message box.

End macro.



Thanks very much.


--
sungen99
------------------------------------------------------------------------
sungen99's Profile: http://www.excelforum.com/member.php...fo&userid=9144
View this thread: http://www.excelforum.com/showthread...hreadid=511057


Chip Pearson

Saving files. Please wait.
 
You can't have a popup display while the file is saving.because
MsgBox and WshShell.Popup are both modal; that is, they halt code
execution until they are replied to. You could create a UserForm,
display it modelessly , save the file then kill the form. This
will work in XL2000 and higher.

MyForm.Show vbModeless
ActiveWorkbook.Save
Unload MyForm


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com






"sungen99"
wrote in
message
...

A little help again please. I need a macro that will

Display a message box saying "Please wait saving files..."

Save the active file (I know how to do this)

Close the message box.

End macro.



Thanks very much.


--
sungen99
------------------------------------------------------------------------
sungen99's Profile:
http://www.excelforum.com/member.php...fo&userid=9144
View this thread:
http://www.excelforum.com/showthread...hreadid=511057




sungen99[_66_]

Saving files. Please wait.
 

Ok, I thought I created a userform that just said.

“Please wait… Saving files”

When the macro runs I get the popup userform… but it does not show the
words “Please wait… Saving files” its just a big white box.

Am I just totally stupid? I looked at other examples of userforms and I
see nothing that is different.


--
sungen99
------------------------------------------------------------------------
sungen99's Profile: http://www.excelforum.com/member.php...fo&userid=9144
View this thread: http://www.excelforum.com/showthread...hreadid=511057


Chip Pearson

Saving files. Please wait.
 
Try repainting the form.

UserForm1.Repaint


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



"sungen99"
wrote in
message
...

Ok, I thought I created a userform that just said.

"Please wait. Saving files"

When the macro runs I get the popup userform. but it does not
show the
words "Please wait. Saving files" its just a big white box.

Am I just totally stupid? I looked at other examples of
userforms and I
see nothing that is different.


--
sungen99
------------------------------------------------------------------------
sungen99's Profile:
http://www.excelforum.com/member.php...fo&userid=9144
View this thread:
http://www.excelforum.com/showthread...hreadid=511057




sungen99[_67_]

Saving files. Please wait.
 

Yep. that worked!

Who come it did not work before? I would like to understand. this is my
code



Sub TEST()

UserForm1.Show vbModeless
UserForm1.Repaint
ActiveWorkbook.Save
Unload UserForm1

End Sub


--
sungen99
------------------------------------------------------------------------
sungen99's Profile: http://www.excelforum.com/member.php...fo&userid=9144
View this thread: http://www.excelforum.com/showthread...hreadid=511057



All times are GMT +1. The time now is 01:32 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com