Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1488to1492
1488to1492
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Schriftfarbe / Hyperlink automatische Mail

Forumthread: Schriftfarbe / Hyperlink automatische Mail

Schriftfarbe / Hyperlink automatische Mail
04.05.2016 10:57:23
Sirka
Hallo Ihr Lieben,
ich habe ein Makro, welches automatisch Mails mit einem bestimmten Text verschickt.
Jetzt würde ich gerne die Schriftfarbe von 3 Wörtern im Text auf rot ändern,
damit sie besonders hervor stechen.
Ist das möglich? Wenn ja, was muss ich dafür machen?
Außerdem ist in diesem Text ein Link.
Der ist ziemlich lang und um das optisch schöner zu gestalten würde ich den Link
gerne hinter ein paar Wörtern "verstecken" wie einen Hyperlink.
Auch hier die Frage: Ist das möglich? Wenn ja, wie?
Vielen Dank für eure Hilfe!
Liebe Grüße
Sirka

Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Schriftfarbe / Hyperlink automatische Mail
04.05.2016 12:05:34
Rudi
Hallo,
das ist möglich.
Du musst den Text inkl. Hyperlink als HTML-Code an den HTMLBODY (nicht den BODY) der Mail übergeben.
Gruß
Rudi

AW: Schriftfarbe / Hyperlink automatische Mail
04.05.2016 12:33:34
Sirka
Hallo Rudi,
Danke für deine Hilfe! Leider stehe ich noch ganz am Anfang meiner Makro-Karriere und verstehe noch nicht viel.
Mein Makro sieht grade so aus:
Sub Mail_with_outlook1(FormulaCell As Range)
Dim OutApp As Object
Dim OutMail As Object
Dim strto As String, strcc As String, strbcc As String
Dim str


Sub As String, strbody As String
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
strto = Cells(FormulaCell.Row, "R").Value
strcc = ""
strbcc = ""
str


Sub = "Titel der Mail"
strbody = "Guten Tag, " & vbNewLine & vbNewLine &_
"Sie haben " & Cells(FormulaCell.Row, "K").Value & " offene Punkte." & _
vbNewLine & "Bitte arbeiten Sie diese ab." & _
vbNewLine & vbNewLine & _
"Ihre offenen Punkte finden Sie unter
http://
'hier steht jetzt ein sehr langer Link, den ich gerne verpacken würde. Zum Beispiel in Ihre  _
offene Punkte finden Sie hier.
With OutMail
.To = strto
.CC = strcc
.BCC = strbcc
.Subject = strsub
.Body = strbody
.Display
End With
Set OutMail = Nothing
Set OutApp = Nothing
End Sub




Was muss ich da jetzt genau ändern? strbody in HTMLBODY? Und dann?

Vielen, vielen Dank für die Hilfe!
Anzeige
AW: Schriftfarbe / Hyperlink automatische Mail
04.05.2016 12:43:34
Sirka
Hallo Rudi,
Danke für deine Hilfe! Leider stehe ich noch ganz am Anfang meiner Makro-Karriere und verstehe noch nicht viel.
Mein Makro sieht grade so aus:
Sub Mail_with_outlook1(FormulaCell As Range)
Dim OutApp As Object
Dim OutMail As Object
Dim strto As String, strcc As String, strbcc As String
Dim str


Sub As String, strbody As String
Set OutApp = CreateObject("Outlook.Application")
Set OutMail = OutApp.CreateItem(0)
strto = Cells(FormulaCell.Row, "R").Value
strcc = ""
strbcc = ""
str


Sub = "Titel der Mail"
strbody = "Guten Tag, " & vbNewLine & vbNewLine &_
"Sie haben " & Cells(FormulaCell.Row, "K").Value & " offene Punkte." & _
vbNewLine & "Bitte arbeiten Sie diese ab." & _
vbNewLine & vbNewLine & _
"Ihre offenen Punkte finden Sie unter
http://
'hier steht jetzt ein sehr langer Link, den ich gerne verpacken würde. Zum Beispiel in Ihre  _
offene Punkte finden Sie hier.
With OutMail
.To = strto
.CC = strcc
.BCC = strbcc
.Subject = strsub
.Body = strbody
.Display
End With
Set OutMail = Nothing
Set OutApp = Nothing
End Sub




Was muss ich da jetzt genau ändern? strbody in HTMLBODY? Und dann?

Vielen, vielen Dank für die Hilfe!
Anzeige
AW: Schriftfarbe / Hyperlink automatische Mail
04.05.2016 12:51:27
Rudi
Hallo,
.htmlbody=strbody
strbody muss aber den Text in HTML enthalten.
Etwa so:
strbody = "Guten Tag, " & "&ltbr&gt"& "&ltbr&gt"&_
"Sie haben " & Cells(FormulaCell.Row, "K").Value & " offene Punkte." _
& "&ltbr&gt"& "Bitte arbeiten Sie diese ab."
In diesem String kannst du auch per Font-Tags die Schriftfarbe etc ändern.
Gruß
Rudi

Anzeige
AW: Schriftfarbe / Hyperlink automatische Mail
04.05.2016 14:08:30
Sirka
Dankeschön,
habe ich soweit erstmal hinbekommen.
Ich schaffe es aber nicht die Farbe bei dem Zellbezug zu ändern.
strbody = "Guten Tag, " & "
" & "
" & _
"Sie haben " & Cells(FormulaCell.Row, "K").Value & " _
offene Punkte"
So wird ja jetzt nur "offene Punkte" rot eingefärbt.
Wie muss ich den Code schreiben damit auch der Zellbezug davor rot wird?
Bei all meinen Versuchen wurden mir Fehlermeldungen angezeigt...
Vielen Dank nochmal! :)

Anzeige
AW: Schriftfarbe / Hyperlink automatische Mail
04.05.2016 16:11:56
Rudi
Hallo,
bspw: 
strText = "Guten Tag,&ltbr&gt"
strText = strText & "Sie haben &ltfont color=ff0000&gt&ltb&gt" & Range("A1") & "&lt/b&gt offene  _
Punkte.&lt/font&gt&ltbr&gt"
strText = strText & "Bitte erledigen."
Gruß
Rudi
Anzeige
;

Forumthreads zu verwandten Themen

Befehlsschaltfläche zum Versenden einer e-Mail
Roland

Hallo. Ich habe eine für mich sehr harte "Nuss" zu knacken. Ich habe über Excel ein Rechnungsprogramm erstellt. jetzt möchte ich diese Rechnung immer per e-mail versenden. Ich brauche eine Befehlsschaltföläche, die einen bestimmten Bereich als e_mail versendet. Also.... Die Schaltfläche sollte...
11.08.2008 13:17:00
Thread-ID: 1000827
2 Beiträge
Outlook Emails einlesen und löschen
Peter

Ich würde gerne den Outlook Posteingang in Excel einlesen und danach den Outlook Posteingang löschen.
Wie kann so etwas in VBA realisiert werden?
19.08.2008 18:20:00
Thread-ID: 1003019
3 Beiträge
Email per Hyperlink aus Zelle mit Formel
Frank

Hallo und schönen guten Morgen zusammen,
neues kleines Problem!
Ich möchte mit Hilfe eines Hyperlink per klick eine Email öffnen!
Soweit so gut und kein Problem!
Jetzt steht die Email Adresse aber nicht wirklich in der Zelle sondern diese hole ich mir per
Sverweises aus ein...
21.08.2008 09:22:45
Thread-ID: 1003367
3 Beiträge
Outlook Email einlesen/löschen
Peter

Ich bin zwar in der Lage Emails von Excel/VBA via Outlook abzusenden.
Jetzt würde ich jedoch gerne via VBA/Excel Emails einlesen, den Header der eingehenden Email auslesen und danach die Email wieder löschen.
Danke für die Unterstützung.
Grüße
Peter
29.08.2008 15:07:44
Thread-ID: 1005850
3 Beiträge
Off-Topic: Namen von Queries in Access nach Excel
Queries

Tach auch,
ich soll zu den ca. 200 existierenden Queries in unserer Access-Datenbank Beschreibungen abliefern und Kurzbeschriebe, was das Ziel der Query ist, auflisten. Da würde ich mir gerne die Arbeit ersparen jede Query einzeln den Namen kopieren zu müssen.
Gibt es eine Möglichkeit...
24.09.2008 11:24:00
Thread-ID: 1012003
4 Beiträge
Hilfe: Hyperlink auf email setzen?
Mike

Hi Leute,
Mein Problem bzw. Frage ist folgende:
Ich möchte in einer Exceltabelle einen Hyperlink setzen,
mit dem automatisch das Excelfile, in dem der Link sitzt,
an eine bestimmte email-Adresse versandt werden soll.
(bzw. durch den sich Outlook öffnet und der Empfänger...
21.10.2008 10:14:00
Thread-ID: 1017882
3 Beiträge
Email Ergänzing, Adresse CC
Karel

Hallo Forum,
habe in diese Forum unterstehende Email VBA code gefunden.
AUF tabelleblatt Mailadresse stehn ab A2 sten untereinander alle Emailadresse
Wie kann ich Emailadresse als CC genau so abfragen auf Tabelleblatt mail adressen ab Zelle C2
Option Explicit
Sub Serien_E...
23.10.2008 19:45:00
Thread-ID: 1018786
7 Beiträge
Anzeige
E-Mail abhängig von zwei Zellinhalten
zwei

Hallo Forum,
bei folgender Aufgabe benötige ich Hilfe: 12 Wochen vor Tagungsbeginn soll an den Referenten eine Erinnerungsmail geschickt werden. Damit dies nicht täglich, sondern nur einmal wöchentlich passieren muss, stehen in Spalte A die Wochenbezeichnungen. In Spalte H stehen die E-Mail...
26.10.2008 11:46:35
Thread-ID: 1019339
3 Beiträge
Syntaxfehler in htmlbody bei Mailversand
Thomas

Hallo,
ich habe hier einen kleinen Code der aus Excel eine Mail verschicken soll.
Leider habe ich ein bisschen Probleme mit einer Tabelle im htmlbody - die wirft mir ständig nur Syntaxfehler entgegen.
Vorher hat alles einwandfrei funktioniert.
Den Code muss ich leider anhängen,...
30.10.2008 11:22:14
Thread-ID: 1020536
2 Beiträge
Inhalte aus Emails importieren.
Stephan

Hallo,
ich habe ca. 600 Rückmeldungen von fehlerhaften Email Adressen. Dabei steht die Email Adresse, die fehlerhaft ist in dieser Email immer an der gleichen Stelle. Wie kann ich diese Email Adressen in eine Spalte von Excel importieren? Ich nutze Outlook 2007.
Danke vorweg für jede Hi...
18.11.2008 08:51:00
Thread-ID: 1025486
8 Beiträge
Anzeige
Email Hyperlinke mit Betreff aus Dateiname&Registe
Patrick

Hallo miteinander
Ich versuche von der Excel Tabelle eine Email über einen Email Hyperlink zu starten. Diese Email soll automatisch im Betreff den Dateinamen der Exceltabelle und den Namen des aktiven Tablellenblattes/Registers enthalten.
Geht das und wie heisst der Hyperlink dazu ?
...
07.12.2008 15:18:33
Thread-ID: 1030869
3 Beiträge
Spalten in Zeilen vor Import in Access DB
mat

Hallo,
ich soll im Rahmen eines kleines Projektes einen SAP Export in eine Access DB importieren.
Das Problem liegt darin, dass die Exceldatei alle Umsätze und Absätze in einer Zeile hat. Hierbei bildet jeder Monat eine Spalte.
Für eine Datenbank macht es natürlich mehr Sinn je Mona...
08.12.2008 19:10:00
Thread-ID: 1031167
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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