A family of Microsoft spreadsheet software with tools for analyzing, charting, and communicating data.
The issue seems to be this code:
No.
The problem is that your concept did not work at all. Make a new file and call a form as shown below.
Andreas.
Sub Test()
UserForm1.Show False
On Error Resume Next
With UserForm1
'Wait till the form is on screen
Do While Not .Visible
DoEvents
Loop
'Wait while the form is open
Do While .Visible
DoEvents
Loop
End With
End Sub