Excel Bereich an einem bestimmten Datum an E-mail senden

[schauan]

Hallöchen,

aus Sicherheitsgründen funktioniert .Send nicht mehr. Der user müsste ggf. selbst auf Senden drücken.

Ansonsten, nimm mal statt

Code:

With .GetInspector.WordEditor.Application.Selection
      .Start = iEinf: .End = iEinf
       .PasteExceltable                                'Grafik in Mail einfügen
  End With

dann

Code:

.GetInspector.WordEditor.Range(iEinf, iEinf).Paste 'Bereich in EMail als Tabelle einfuegen

[Marek]

Hallo!
Danke für die Hilfe! 
Jetzt funktioniert es!
LG
Marek

[volti]

Hallo Marek,

den .Display bitte stehen lassen. Der wird speziell hier zum Einfügen benötigt.

Den .Send-Befehl vor das letzte End With setzen. Falls, wie ich aus Deinem letzten Post entnehme, keine Sicherheitsabfrage kommt, wird die Mail ja versendet.
Da braucht man den SendKeys ja nicht.
Dieser sollte ja nur den Tastenanschlag Alt-S simulieren.

viele Grüße
Karl-Heinz

---

Hi Schauan,

irgendwie komme ich mit den mehreren Seiten noch nicht zurecht, daher lese ich jetzt erst, dass es bei Marek funktioniert.

Allerdings habe ich gerade eine Mail via .Send von meinem Privatrechner an meine eigene eMail-Adresse geschickt. Ohne Sicherheitsmeldung tadellos abgesendet und angekommen.

Ich denke, dass das schon noch funktioniert und es von den Einstellungen abhängt. Während meiner langjährigen Arbeitszeit in der Firma ging es nicht, da kam die Meldung.

viele Grüße
Karl-Heinz

[Marek]

Hallo!
Vielen vielen Dank für die Info!
Funktioniert fast noch besser!
Grüße
Marek