| ActiveDocument.Route, ActiveDocument.SendMail |
|
|
| Auf einem Word-Dokument befindet sich ein Button ‘Senden’. Auf Knopfdruck soll das Dokument |
| per E-Mail verschickt werden. Der Code dazu lautet normal: ActiveDocument.SendMail. |
| Outlook öffnet sich, und das Word-Dokument wird als Anhang in die Mail eingefügt. |
|
| Bei der unten stehenden Lösung werden ‘Subjekt’ und ‘Empfänger’ als Parameter in die Mail übergeben, |
| wenn die Empfänger immer gleich sind: |
|
| Sub MailWordByOutlook() |
| ActiveDocument.HasRoutingSlip = True |
| With ActiveDocument.RoutingSlip |
| .Subject = "Test" |
| .AddRecipient "first-address@mail.com" |
| .AddRecipient "second-address@mail.com" |
| .Delivery = wdAllAtOnce |
| End With |
| ActiveDocument.Route |
| End Sub |
|
|
|
|
|
|
|
|
|
|