Icon from arrow to Sand hour
 

Sub Auto_Open()
Dim Res As Long
Res = MsgBox("TEST", _
Buttons:=vbYesNo + vbQuestion, _
Title:="")

If Res = vbYes Then Call Inputdate
End Sub

Before I click Yes/No - my icon changes from arrow to sand hour - how can i
prevent this??

Icon from arrow to Sand hour
 

Hi,

The code below works fine and doesn't look like the cause of your problem.
Perhaps there is more code executing in the workbook_open event module. have
a look there.

Mike

"transferxxx" wrote:

Sub Auto_Open()
Dim Res As Long
Res = MsgBox("TEST", _
Buttons:=vbYesNo + vbQuestion, _
Title:="")

If Res = vbYes Then Call Inputdate
End Sub

Before I click Yes/No - my icon changes from arrow to sand hour - how can i
prevent this??