Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
25.04.2024 21:06:05
Duplikate entfernen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
560to564
560to564
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text in Mail einfügen

Text in Mail einfügen
07.02.2005 07:21:41
Ebneter
Eine Exceltabelle möchte ich mittels VBA-Code mailen. Ich habe bereits folgende Anweisung geschrieben:
ActiveWorkbook.SendMail Recipients:="thomas.muster@swisslife.ch", Subject:="Offerten- und Neuabschlussreporting"
Wie kann ich noch zusätzlichen Text ins Mail einfügen. Der Befehl "Subject" erstellt den Betreffvermerk. Wie heisst der Befehl für den Mailtext? Ich möchte den Text für das Mail auch im Excel vorgeben und mittels VBA ins Mail einfügen.

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Text in Mail einfügen
Willie
Hallo Ebneter Gallus
Ich habe dir hier ein Beispiel, damit kannst wahrscheinlich alles machen, was du willst!
Rückmeldung wäre nett!
Gruß
Willie

Sub EMail4U()
Dim outObj As Object
Dim Mail As Object
Dim i As Integer
Set outObj = CreateObject("Outlook.Application")
Set Mail = outObj.CreateItem(0)
With Mail
.Subject = "Rechnungen"
.Body = "Sehr geehrte Damen und Herren " & Chr(13) & _
"Bitte prüfen Sie die angehängten Rechnungen" & Chr(13) & _
"Viele Grüße " & Chr(13) & _
Application.UserName
.To = "test1@abc.de"
.CC = "test2@abc.de"
.BCC = "test3@abc.de"
End With
Mail.Display
Set Mail = Nothing
Set outObj = Nothing
End Sub

Anzeige

179 Forumthreads zu ähnlichen Themen

Zeilenumbruch, wenn Textbox in Mail eingefügt wird
a_ke

Hallo,
ich versende mit dem folgenden Code ( von Rene Holtz - Danke !!!)
eine Mail mit Outlook.
Private Sub CommandButton2_Click() '* 11.01.2008, 15:50:00 * '* erstellt von Rene Holtz, http://www.rholtz-office.de _ a> '* rene.holtz@rholtz-office....
05.09.2008 12:00:39
Thread-ID: 1007636
4 Beiträge
Anzeige
Text aus Zelle in MsgBox einfügen.
Wolfgang

Hallo,
über eine Checkbox wird, sofern diese markiert wird, eine MsgBox angezeigt. Wie kann ich erreichen, dass aus einem Tabellenblatt "Steuerung" der Text aus Zelle E20 mit eingefügt werden kann?
MsgBox "Bitte folgende Hinweise beachten:"......... und dann der Text aus Zelle E20.
...
08.07.2009 21:08:52
Thread-ID: 1087280
5 Beiträge
Leistungstexte in RE per SVERWEIS einfügen
Jana

Hallo Leute,
könnt ihr mir mal aus die Sprünge helfen...
Ich möchte Rechnungen in Excel schreiben und die benötigten Leistungstexte mittels SVERWEIS ergänzen.
Wie kann ich das Suchkriterium (eine Nummer) ausblenden, so daß es auf der Rechnung nicht erscheint, mir jedoch den Leistung...
18.08.2009 00:11:03
Thread-ID: 1096593
11 Beiträge
Anzeige
Tabelle in Intervallen per Mail verschicken
Universal

N`Abend zusammen! :-)
Ich würde gern meine Arbeit etwas erleichtern ... meine Kollegen und ich haben eine Excel-Tabelle, die jede Stunde mit Daten gefüllt wird. Wie ich Mails per VBA verschicken kann weiss ich. Leider fehlt mir aber das Wissen um die Tabelle in einem stündlichen Intervall a...
21.12.2009 23:03:13
Thread-ID: 1125480
7 Beiträge
Kopierten Text in E-Mail einfügen | Herbers Excel-Forum
Urmila
Hallo alle zusammen,
und schon habe ich eine andere Frage...
Mit dem folgenden Code generiere ich eine E-Mail im Excel Dim OutLookJob As Object, mymail As Object, month As Integer, year As Integer month = Format(Date, "MM") year = Format(Date, "YYYY") Set OutLookJob = CreateObject("Outlook....
13.01.2010 15:44:58
Thread-ID: 1129549
5 Beiträge
Einfügen in neuem Tabellenblatt
Space

Hallo,
ich habe folgendes Problem. Über einen Button auf dem Tabellenblatt1 will ich das Tabellenblatt 3 (Outlook Kontakte) öffnen und die Outlook entnommenen Kontakte dort eintragen lassen. Der Zugriff auf Outlook funktioniert wunderbar. Die Werte die er dort heraus bekommt trägt er aber...
19.01.2010 14:06:41
Thread-ID: 1131048
7 Beiträge
Einfügen in neuem Tabellenblatt
Space

Hallo, leider war mein letzter Beitrag schon wieder zu ... hier nocheinmal die Problematik:
ich habe folgendes Problem. Über einen Button auf dem Tabellenblatt1 will ich das Tabellenblatt 3 (Outlook Kontakte) öffnen und die Outlook entnommenen Kontakte dort eintragen lassen. Der Zugriff auf...
19.01.2010 14:59:16
Thread-ID: 1131070
2 Beiträge
TextBox - kontextMenü um einen Hyperlink einfügen
Frank

Hallo euch Allen und vorab frohe Ostern!!!
Meine Frage: Wie kann ich erreichen, dass wenn ich eine TextBox in einer UF ansteuere sich ein Kontextmenü öffnet, so dass ich dann in die TextBox einen Hyperlink eingeben kann. Wer weiß Rat?
Vorab Danke!!!
Gruß Frank H.!!!
31.03.2010 21:12:34
Thread-ID: 1149714
12 Beiträge

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
6
4
10
4
6
4
6
1
11
12
3
4
2
2
4
2
2
1
1
4
1
1
4
7