ich versende eine Email direkt aus Excel
heraus. Dabei soll mir der Inhalt von Zelle
B2 fett angezeigt werden. Ich bekomme leider
mit untenstehenden Code ein Fehlermeldung.
Hat jemand eine Idee ?
Sub Mailversenden()
Dim outobj As Object
Dim mail As Object
Set outobj = CreateObject("outlook.application")
Set mail = outobj.createItem(0)
mail.Subject = "Bericht"
mail.body = "Bitte um Ausführung" & Chr(13) & _
range("b2").font.bold = true
mail.to = Range("b7")
mail.display
Set mail = Nothing
Set outobj = Nothing
End Sub