Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Beim Kopieren in andere Datei Formatproblem!

Forumthread: Beim Kopieren in andere Datei Formatproblem!

Beim Kopieren in andere Datei Formatproblem!
24.10.2003 16:22:05
Oliver S.
Hallo an alle,

habe nachfolgendes Makro in der Recherche gefunden.


Private Sub E_Mailversand_Click()
Dim oOL As Object
Dim oOLMsg As Object
Dim oOLRecip As Object
Dim sAddress As String
sAddress = Range("D2").Value
Set oOL = CreateObject("Outlook.Application")
Set oOLMsg = oOL.CreateItem(0)
With oOLMsg
Set oOLRecip = .Recipients.Add(sAddress)
.Subject = "Abrechnung Hundeverein"
.Body = "Bitte zum nächsten Treffen " & Range("G2").Value & " € mitbringen."
.Importance = 1
.Send
End With
oOLRecip.Resolve
Set oOLRecip = Nothing
Set oOLMsg = Nothing
Set oOL = Nothing
End Sub


Dieses Makro kopiert mir den Inhalt einer Zelle in eine E-Mailnachricht. Nun habe ich aber das Problem, das die Zellenformatierung nicht mitkopiert wird. Also wenn z.B. in der Zelle G2 der Wert 12,00 ist, wird in der E-mail nur die 12 ohne Nachkommastellen angezeigt. Kann mir eventuell jemand behilflich sein, dass immer die ganze Zahl mit den Nachkommastellen kopiert wird?

Danke Euch schon mal für die Hilfe,
Oliver
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Beim Kopieren in andere Datei Formatproblem!
24.10.2003 16:23:52
Hajo_Zi
Hallo Oliver

mal ungetestet

Benutze nicht .Value sondern .Text

Bitte keine Mail, Probleme sollten im Forum gelöst werden.

Microsoft MVP für Excel

Das Forum lebt auch von den Rückmeldungen.


Anzeige
AW: Beim Kopieren in andere Datei Formatproblem!
24.10.2003 16:29:53
Oliver S.
Danke Dir Hajo, das funktioniert tadellos. Ich wusste Doch, auf diese Forum ist verlass.
Danke Dir noch mal,
Oliver
AW: Beim Kopieren in andere Datei Formatproblem!
24.10.2003 16:25:25
WernerB.
Hallo Oliver,

versuche es mal so:

.Body = "Bitte zum nächsten Treffen " & Range("G2").Text & " € mitbringen."

Viel Erfolg wünscht
WernerB.

P.S.: Das Forum lebt auch von den Rückmeldungen der Fragesteller an die Antworter (siehe Forums-FAQ).
Anzeige

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige