hoe kan ik een formulier laten verzenden dmv een button?

  • Onderwerp starter Onderwerp starter DCHR
  • Startdatum Startdatum
Status
Niet open voor verdere reacties.

DCHR

Gebruiker
Lid geworden
2 mei 2007
Berichten
36
Hoi,

Ik ben bezig een formulier in WORD te maken. Nu wil ik het graag door middel van een druk op de knop laten versturen naar een bepaald emailadres. Het lukt me wel om dmv een druk op de knop het formulier als bijlage in een nieuw emailtje in outlook te laten verschijnen, echter moet ik dan nog handmatig het emailadres invullen. Ik hoop dat dit makkelijker kan.

Groet,

Martijn
 
Met deze macro

Code:
Sub verstuur()
   With ActiveDocument
        .HasRoutingSlip = True
        With .RoutingSlip
            .AddRecipient [COLOR="teal"]"xxx@yyy.nl"[/COLOR]
            .Protect = wdNoProtection
            .Delivery = wdAllAtOnce
            .ReturnWhenDone = False
            .Subject = [COLOR="Teal"]"formulier"[/COLOR]
        End With
        .Route
        .Close 0
    End With
End Sub

Zonder macro:
Menubalk/bestand/verzenden naar.../ circulatielijst.
 
Ok, dit werkt, waarvoor mijn zeer hartelijke dank! Echter krijg ik nu de volgende tekst:

Het bijgevoegde document bevat een circulatielijst. U bent de laatste in de rij. Verder rondsturen is niet nodig.

weet je hoe ik dat weg kan krijgen?

En verder, Weet je ook hoe ik iets van een melding kan makewn dat het formulier daadwerkelijk verstuurd is?
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan