Zum Inhalt springen

Empfohlene Beiträge

Ike

Hallo,

ich benutze den folgenden Code aus dem internet für ein einfaches Makro um in Outlook eine eMail mit den entsprechenden Einstellungen zu öffnen. Kann mir jemand sagen, wie ich eine Tabelle, die ich vorher als Range definiere dann dort unter den Text einfügen kann?

Ausserdem wollte ich noch fragen, wie ich einen Empfänger als Kopie einfügen kann.

Vielen Dank im Vorraus !

 

 

Dim olApp As Object
   Set olApp = CreateObject("Outlook.Application")
   With olApp.CreateItem(0)



       .Recipients.Add Worksheets("settings").Range("D4")


       .Subject = Worksheets("settings").Range("D8")


       .Body = Worksheets("settings").Range("D10") 


       .ReadReceiptRequested = False

       .Display

Diesen Beitrag teilen


Link zum Beitrag
jim76

Hallo,

ich benutze den folgenden Code aus dem internet für ein einfaches Makro um in Outlook eine eMail mit den entsprechenden Einstellungen zu öffnen. Kann mir jemand sagen, wie ich eine Tabelle, die ich vorher als Range definiere dann dort unter den Text einfügen kann?

Ausserdem wollte ich noch fragen, wie ich einen Empfänger als Kopie einfügen kann.

Vielen Dank im Vorraus !

 

 

Dim olApp As Object
   Set olApp = CreateObject("Outlook.Application")
   With olApp.CreateItem(0)



       .Recipients.Add Worksheets("settings").Range("D4")


       .Subject = Worksheets("settings").Range("D8")


       .Body = Worksheets("settings").Range("D10") 


       .ReadReceiptRequested = False

       .Display

 

Was hat das mit Wertpapieren zu tun, wenn ich mal fragen darf?

Diesen Beitrag teilen


Link zum Beitrag
xolgo

Hallo,

ich benutze den folgenden Code aus dem internet für ein einfaches Makro um in Outlook eine eMail mit den entsprechenden Einstellungen zu öffnen. Kann mir jemand sagen, wie ich eine Tabelle, die ich vorher als Range definiere dann dort unter den Text einfügen kann?

 

Wie soll die Tabelle in Text verwandelt werden?

 

Ausserdem wollte ich noch fragen, wie ich einen Empfänger als Kopie einfügen kann.

 

.cc = "em@il"

Diesen Beitrag teilen


Link zum Beitrag
AlbertEinstein

BodyFormat auf HTML umstellen, und dann HTML Code erzeugen. Soll einfach das ganze Tabellenblatt eingefügt werden gibt es dafür auch eine eingebaute Funktion in Excel:

 

   	.BodyFormat = olFormatHTML
   	.HTMLBody = ThisWorkbook.HTMLProject.HTMLProjectItems("Sheet1").Text

 

Kann mir jemand sagen, wie ich eine Tabelle, die ich vorher als Range definiere dann dort unter den Text einfügen kann?

Diesen Beitrag teilen


Link zum Beitrag
Ike

Danke euch, ich hab schon gemerkt dass ich da etwas umfangreicher vorgehen muss. Hab zum Glück eine gute vorlage für den html body gefunden und das genügt meinen ansprüchen ;)

Diesen Beitrag teilen


Link zum Beitrag

Erstelle ein Benutzerkonto oder melde dich an, um zu kommentieren

Du musst ein Benutzerkonto haben, um einen Kommentar verfassen zu können

Benutzerkonto erstellen

Neues Benutzerkonto für unsere Community erstellen. Es ist einfach!

Neues Benutzerkonto erstellen

Anmelden

Du hast bereits ein Benutzerkonto? Melde dich hier an.

Jetzt anmelden

×
×
  • Neu erstellen...