kann mir jemand sagen, warum meine Datei zum Einlesen von Aufgaben in Outlook nicht funktioniert?
https://www.herber.de/bbs/user/117009.xlsm
If Cells(i, 6).Value = "" Then
myitem.DueDate = ""
Else
myitem.DueDate = Cells(i, 6).Value
End If
Hier bricht er ab "myitem.DueDate = Cells(i, 6).Value" Dim datDueDate As Date
datDueDate = Cells(i, 6).Value
If Cells(i, 6).Value = "" Then
myitem.DueDate = ""
Else
myitem.DueDate = datDueDate
End If
VBA/HTML-CodeConverter, AddIn für Office 2002-2016 - in VBA geschrieben von Lukas Mosimann. Projektbetreuung:RMH Software & Media
Code erstellt und getestet in Office 16 - mit VBAHTML 12.6.0
Oder: myitem.DueDate = Format(Cells(i, 6).Value,"DD.MM.YYYY")