display error

[nastya]

hi
getting "a dialog box is open.Close it and try again" , while running the code :

Sub CreateFromTemplate()
Dim myOlApp As Outlook.Application
Dim MyItem As Outlook.MailItem
Set myOlApp = CreateObject("Outlook.Application")
Set MyItem = myOlApp.CreateItemFromTemplate("C:\statusrep.oft")
MyItem.Display
End Sub

the error occurs on .Display .
how should i fix it, or there is another way to load/show/display my template form?

10x

[sciguyryan]

hi
getting "a dialog box is open.Close it and try again" , while running the code :

Sub CreateFromTemplate()
Dim myOlApp As Outlook.Application
Dim MyItem As Outlook.MailItem
Set myOlApp = CreateObject("Outlook.Application")
Set MyItem = myOlApp.CreateItemFromTemplate("C:\statusrep.oft")
MyItem.Display
End Sub

the error occurs on .Display .
how should i fix it, or there is another way to load/show/display my template form?

10x

Well, you could try myOlApp.Visible = True. If that does not work then can you tell me the name of the reference so, I cna add it and try it myself?

Cheers,

RyanJ

[westconn1]

what is the dialogbox that is open?

pete