Toon posts:

[Outlook VBA] Taak (task) verwijderen in code

Pagina: 1
Acties:

Verwijderd

Topicstarter
Ik heb de volgende code om een taskitem in VBA aan te maken:

Private Sub Knop41_Enter()
Dim myOutlook As Outlook.Application
Dim myItem As TaskItem
Dim myRequiredAttendee As Object
Dim startDate As Date

On Error Resume Next
Set myOutlook = GetObject(, "Outlook.application")

If myOutlook Is Nothing Then
Set myOutlook = CreateObject("Outlook.Application")
End If

On Error GoTo 0

Set myItem = myOutlook.CreateItem(olTaskItem)

With myItem
.Assign
.Subject = "Dit is een test"
.ReminderTime = #8/1/2004 8:00:00 AM#
.startDate = #8/2/2004#
.DueDate = #8/2/2004#
End With

Set myRequiredAttendee = myItem.Recipients.Add("test@test.nl")
myItem.Send
End Sub

Dit werkt prima maar hoe kan ik nu zo'n taskitem verwijderen vanuit VBA?
Ik heb myItem.delete al geprobeerd en dat werkt niet.

Iemand een suggestie

  • F_J_K
  • Registratie: Juni 2001
  • Niet online

F_J_K

Moderator CSA/PB/AI

Front verplichte underscores

Ik heb myItem.delete al geprobeerd en dat werkt niet.
Niet vreemd, aangezien je daarvoor myItem = myOutlook.CreateItem(olTaskItem) zegt :P

Ik heb het nooit gebruikt, maar zie onder F1 --> TaskItem staan:
Gebruik Items(index), waarbij index het indexnummer van een taak is of een waarde die overeenkomt met de standaardeigenschap van een taak, om één TaskItem-object uit een map Taken te retourneren.
Dit geeft weer
code:
1
2
    For Each myItem In myItems
        If (myItem.Class = olContact) Then

etc.

:Y)

'Multiple exclamation marks,' he went on, shaking his head, 'are a sure sign of a diseased mind' (Terry Pratchett, Eric)


Verwijderd

Topicstarter
Ah, inderdaad. Een andere insteek, ik ga hier eens mee experimenteren.