Excel VBA - sende sensitiv mail

Jeg benytter VBA-kode til at semde mail via Lotus Notes.
Nogen der kan hjælpe mig med, hvorledes jeg kan definere Information Classification som fx Sensitive?

Tænker det skal defineres i denne del af koden, hvis det er muligt.

'Values to mail main properties.
With noDocument
.Form = "Memo"
.SendTo = vaRecipients
.CopyTo = vaCopyTo
.Subject = stSubject
.Body = vaMsg
.SaveMessageOnSend = True
.PostedDate = Now()
.Send 0, vaRecipients
End With