Access 2010 vs Outlook 2010

Hej Eksperter

Jeg sider og tumler med et problem vedrørende automation af Outlook 2010 via VBA kode i Access 2010. Det lidt svært at forklare, men jeg prøver.

I min Access form har jeg en knap som generer en ny mail, og vedhæfter en PDF fil. Når jeg klikker på knappen afvikles nedenstående kode, som virker helt efter hensigten so far:

'Kode start

Dim objOl As New Outlook.Application
Dim objpost As MailItem
Dim vedhæftet As Attachments
Set objpost = objOl.CreateItem(olMailItem)
Set vedhæftet = objpost.Attachments
vedhæftet.Add "C:\Temp\Rolle.PDF"
With objpost
.Subject = "Brugerændring til rollen:" & " " & Me!BrugerRolle.Column(1) & "" & "." & " " & "Tilføj > " & " " & Me!BrugerFuldeNavn & " " & "Pr." & " " & Me!BrugerRollePrDato
.To = "minmailadresse@.dk"
.Display
End With
Set objpost = Nothing
Set vedhæftet = Nothing
Exit Function
errhandler:
MsgBox "ERROR: " & Err.Number & " - " & Err.Description

'Kode slut

Udfordring:
På min form har jeg et felt med navnet BrugerStatus. Jeg vil gerne ændre værdien i dette felt til Aktiv, men først når jeg rent faktisk klikker på Send knappen i Outlook. Jeg kunne jo ændre værdien i feltet når der klikkes på knappen i mim Access form, men dette er ikke hensigtsmæssigt da værdien Aktiv indikere at mailen rent faktisk er sendt. Det et must at mailen altid vises, og ikke sendes med det samme da man skal have muligheden for at skrive i Body feltet før mailen sendes, med de formateringsmuligher, og andre funktioner som Outlook 2010 nu engang tilbyder.

Jeg har googlet på det, men kan ikke rigtig finde noget brugbart. Gad vide om det overhovedet er muligt at programmere via VBA i Access? Hvis ja ville jeg blive meget glad for et kode eks :-)

Hilsen
Anders.