0
votes

I'm working on Excel-VBA code.

I'm getting run time error 429 on line -

Set mobjOLA = CreateObject("Outlook.Application")

Code is given below -

Public Sub Test
    Dim mobjOLA as Object
    Set mobjOLA = CreateObject("Outlook.Application")
End Sub
1
Are you trying to call the function from Excel as a custom formula? - Vityata
How do you pass the strAppSubject then? - Vityata
What kind of Office are you using? 64 or 32 bits? - Vityata
simply delete all your code between Function DeleteAppointmentItemBySubject and End Function, write this line and see whether it works. - Vityata
Tried, not working - keerti

1 Answers

0
votes

There was mistake in system configuration. Reinstalling Office worked as a solution for me.