Bijlage toevoegen in Outlook, automatisch verkenner openen

[posse]

Hallo,

ik zit met een wat ik denk een redelijk simpele vraag maar ik kom er niet uit.

Ik laat met een macro automatisch een email opstellen.
Nu wil ik dat als deze mail is opgesteld er een bijlage toegevoegd wordt waarbij je zelf kan kiezen welk bestand.
De macro moet de windowsverkenner openen in een bepaalde map en vervolgens moet je zelf een bestand kunnen kiezen.

Ik hoop dat iemand mij hierbij kan helpen

Gr.

Zie hieronder een voorbeeld van mijn Macro.

Dim OApp As Object, OMail As Object, Signature As String
Set OApp = CreateObject("Outlook.Application")
Set OMail = OApp.CreateItem(0)
    With OMail
    .Display
    End With
        Signature = OMail.Body
    With OMail
    .To = "logistik@test.nl"
    .Subject = "TEST TEST"
    .Attachments.Add [COLOR="#FF0000"]Wat moet hier komen????[/COLOR]
    .Body = "Hallo," & vbNewLine & vbNewLine & _

 

[edmoor]

De werking van die methode staat hier uitgelegd:
http://msdn.microsoft.com/en-us/library/office/ff869553.aspx

 

[posse]

Hallo Edmoor,

bedankt voor de reactie,de werking van deze methode staat daar inderdaad uitgelegd in het geval dat je een specifiek bestand wil toevoegen waarvan je de locatie en bestandsnaam al weet. In mijn geval weet ik de bestandsnaam niet van te voren en alleen de locatie(map waar het bestand staat). Daarom wil ik automatisch in die map terecht komen waarbij de gebruiker zelf nog het juiste bestand moet selecteren. Volgens mij staat dit niet op de site die jij geeft uitgelegd.

 

[edmoor]

Het selecteren van een bestand is ook een heel andere vraag. Hoe je dat kunt doen staat hier een voorbeeld voor:
http://www.ozgrid.com/forum/showthread.php?t=65530

Ook kun je eens kijken naar Application.GetOpenFilename
http://msdn.microsoft.com/en-us/library/office/ff834966.aspx