Hi everybody and thx to read my post (and my poor english).

I Just created a macro in order to :
1) check if an appoitment (by subject) is currently existing in my calendar
2) delete it if it was found
3) Create a new one with the correct date (or the same if it was correct)

After a lot of forum visited, I created a prety simple code that do the job...But I have sometime the following error when the macro delete an appointment:

Execution error '-2147352567 (80020009)'
Automation ErrorException Occurred
If no appointment is found, the code add correctly the 3 appointment ( 1) )
The following times I run the macro, it do that:
2) delete the 1st and error
3) create the 1st and delete the 2nd and error
4) delete and creat the 1st, create the 2nd and delete the last and error
5) delete the 1st and error
6) Create the 1st and delete the 2nd and error
7) create all and back to the step 1)

Please Login or Register  to view this content.
I already actived the Object Library
I'm in Excel 2013
Outlook 2013
Windows 7

About my sheet, I have 3 lines (1 for each appoitment) with subjet in Row A and date in Row 8, etc.
My appointment are in line 5, 6 and 7

I hope my post is complete and clear as possible
Thx for helping

Lexlut