VBA Outlook

[dekapperjr]

Beste Mensen,

Ik wil een VBA scriptje schrijven voor outlook een standaard mail die ik wil versturen.

Sub Rate_request_FORWARDER_FCA_CFR()
' Don't forget to copy the function GetBoiler in the module.
' Working in Office 2000-2010
    Dim OutApp As Object
    Dim OutMail As Object
    Dim strbody As String
    Dim SigString As String
    Dim Signature As String


    Set OutApp = CreateObject("Outlook.Application")
    Set OutMail = OutApp.CreateItem(0)


    strbody = "<B></B>Dear ......,<br><br>"

    SigString = "C:\Documents and Settings\r.schut\Application Data\Microsoft\Handtekeningen\VLF General.htm"




    If Dir(SigString) <> "" Then
        Signature = GetBoiler(SigString)
    Else
        Signature = ""
    End If


    On Error Resume Next
    With OutMail
        .To = ""
        .CC = ""
        .BCC = ""
        .Subject = "Rate Request, Trade: FCA "
        .htmlBody = strbody & "<br><br>" & Signature
        'You can add files also like this
        '.Attachments.Add ("C:\Documents and Settings\r.schut\Application Data\Microsoft\Handtekeningen\VLF General_files\image001.jpg")
        .Display ' or use.send
    End With


    On Error GoTo 0
    Set OutMail = Nothing
    Set OutApp = Nothing
End Sub

Nu wil ik in de mail een lijstje maken en hiervoor wil ik de "Tab" toets gebruiken hoe moet ik dit doen?

weet iemand dit??

mvg,

Robert