BasSchuring
Gebruiker
- Lid geworden
- 28 okt 2013
- Berichten
- 32
Ik heb een angepast outlookformulier gemaakt voor onze productie afdeling. Nu wil ik rechtsonder alleen commandbutton maken welke dit formulier opslaat in de agenda. Dus een knop die hetzelde doet als "opslaan en sluiten" linksboven in het lint.
Als ik de volgende code in de vba van ThisOutlookSession werkt het alleen niet.
kan iemand mij vertellen wat ik verkeerd doe??
Hoop dat iemand mij kan helpen.
Groeten,
Bas
Als ik de volgende code in de vba van ThisOutlookSession werkt het alleen niet.
Code:
Sub CommandButton1_Click()
Dim apti As Outlook.AppointmentItem
Set apti = Application.CreateItem(olAppointmentItem)
apti.Save
End Subkan iemand mij vertellen wat ik verkeerd doe??
Hoop dat iemand mij kan helpen.
Groeten,
Bas
