I setup a userform that simply has text that says "Please wait while data is loading..."
I used this to position in properly
Sub Launch_UserForm1()
With LoadingMsg
.StartUpPosition = 0
.Left = Application.Left + (0.5 * Application.Width) - (0.5 * .Width)
.Top = Application.Top + (0.5 * Application.Height) - (0.5 * .Height)
.Show
End With
End Sub
However, when the box pops up it stays and doesn't continue the macro until I close it, so I added False at the end of .Show False.
Now it pops up and works properly however the box pops up blank with title only, the text in the box doesn't show. Any ideas?
Bookmarks