Microsoft Office Tutorials and References
In Depth Information
6.2.6 Dateien versenden über Outlook
ActiveSheet.Name = PLeiter
' Abschlussmeldung
MsgBox "Einzelbericht für Projektleiter" _
& vbCr _
& PLeiter _
& " erstellt", vbInformation
End Sub
Die Schaltfläche im Startblatt muss natürlich auch noch angepasst
werden, klicken Sie mit der rechten Maustaste auf das Objekt und
weisen Sie das neue Makro UF_Start zu (das Berichtsmakro lässt sich
nicht mehr selbstständig starten, weil es mit der Variable in der
Klammer eine Übergabe erwartet).
Abbildung 6.8: UserForm startet mit dem Makroaufruf
6.2.6
Dateien versenden über Outlook
Schreiben Sie ein weiteres Makro, das die aktuelle Tabelle aus der
Mappe kopiert und als eigenständige Arbeitsmappe speichert. Die
Anweisungen dazu können Sie mit dem Makrorecorder aufzeichnen.
Im nächsten Schritt produzieren Sie ein Makro, das eine neue E-Mail
in Ihrem E-Mail-Programm (z. B. Outlook) anlegt und die Mappe
mit dem Projektbericht als Anhang einträgt. Später können Sie eine
Liste mit den E-Mail-Adressen der Projektleiter anlegen und alle
Berichte makrogesteuert versenden.
Search JabSto ::




Custom Search