mit folgendem Makro (Autor Bernd Held) versende ich ein Mail auf Knopfdruck:
Sub sendMailThatListHasBeenChanged()
Dim outObj As Object
Dim Mail As Object
Set outObj = CreateObject("Outlook.Application")
Set Mail = outObj.CreateItem(0)
Mail.Subject = "Liste wurde geändert"
Mail.Body = ""
Mail.To = "mickey@mouse.com"
Mail.Display
Set Mail = Nothing
Set outObj = Nothing
End Sub
Der Hintergrund ist, dass ich eine Tabelle habe, die auch von anderen bearbeitet werden darf. Ich möchte aber darüber informiert werden, wenn jemand eine Änderung vornimmt. Das o.g. Makro hat aber den Nachteil, dass das Mail zwar angezeigt, nicht aber direkt verschickt wird, so dass man es auch löschen könnte.
Wie bekomme ich es hin, dass das Mail im Hintergrund verschickt wird, ohne Zutun oder Eingriffsmöglichkeit des Bearbeiters?
Vielen Dank
Gruss,
Martin