'Mail.Body' > Inhalt?
22.01.2003 09:10:11
Martin
folgendes Makro sendet eine Meldung, wenn in einer Datei etwas geändert wurde.
Sub Aenderung()
Dim outObj As Object
Dim Mail As Object
Set outObj = CreateObject("Outlook.Application")
Set Mail = outObj.CreateItem(0)
Mail.Subject = "Aenderung erfolgt"
Mail.Body = ""
Mail.To = "xy@z.com"
Mail.Display
Mail.Send
Set Mail = Nothing
Set outObj = Nothing
End Sub
Besteht die Möglichkeit bei 'Mail.Body' eine Range einzugeben, die dann aus dem Tabellenblatt kopiert und in den Mailkörper eingefügt wird?
Gruss,
Martin