Tabellenblatt versenden, Email Text
21.04.2008 06:45:00
Ralf
ich versende mit folgendem Makro ein Tabellenblatt:
Private Sub CommandButton2_Click()
Range("A1:A56").Select
ActiveWorkbook.EnvelopeVisible = True
With ActiveSheet.MailEnvelope
.Introduction = "Hallo Mark," & vbCrLf & vbCrLf & "in der Tabelle findest Du die aktuelle _
Kostenaufstellung der Schleiferei Halle 72." & vbCrLf & vbCrLf & "Unter dem Link findest Du weitere Details zu der Aufstellung." & vbCrLf & "\\server\pfad\kosten.xls" & vbCrLf & vbCrLf & "Viele Grüße"
.Item.To = "ralf.potocnik@bmw.de"
.Item.Subject = "Abrechnung Schleiferei Halle 72 vom " & Date
.Item.Send
End With
Range("C2").Select
End Sub
Nun habe ich mit der Email 2 Probleme:
1. Der Link aus dem Makro \\server\pfad\kosten.xls wird als Text angezeigt und nicht als Hyperlink.
Wie lautet die richtige Syntax, um in der Email den Pfad als Hyperlink anzuzeigen?
2. Der Text in der HTML Email wird in der Schriftart Times Roman dargestellt. Standardmäßig ist aber Arial eingestellt. Wieso wird für die Email nicht Arial hergenommen?
Danke schon mal für Eure Hilfe.
Viele Grüße
Ralf
