vergaderverzoek vanuit excel

[Mde]

hallo,

Ik probeer een vergaderverzoek vanuit excel te versturen.
ik heb deze code van de site van SNB http://www.snb-vba.eu/VBA_Excelgegevens_mailen.html#L_6

Sub vergaderverzoek_nieuw()
c00 = "Jaarvergadering"
c01 = "Zaal A"
c02 = Format(DateAdd("d", 2, Date) + TimeValue("20:15"), "ddddd hh:mm")
c03 = 55
c04 = "......."

With CreateObject("Outlook.Application").CreateItem(1)
.Subject = c00
.MeetingStatus = 1
.Location = c01
.Start = c02
.Duration = c03
.Recipients.Add c04
.send
End With
End Sub

met in c04 een mail adres maar krijg dan de melding: Fout 287 tijdens uitvoering: Door de toepassing of door object gedefinieerde fout.
De mail word verzonden via outlook.

 

[snb]

Als je de macro met F8 doorloopt, in welke regel ontstaat dan de foutmelding ?

 

[Mde]

op de regel van .recipients. add c04

 

[snb]

behoort dat emailadres al tot een van je kontakten in het adresboek ?

 

[Mde]

was het niet heb die toegevoegd maar de fout blijft

 

[snb]

Net nog even getest met een fantasie emailadres: geen probleem.
Doe het eens zonder gebruik te maken van een variabele.

 

[Mde]

werkt ook niet.
Ga het nog wel eens testen op een andere pc, kijken of het aan outlook ligt.
dank voor je tijd.