Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen (A bis Z)

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit

Makro: geöffnetes Excel Dokument per Anlage mit OL versenden

Frage Entwicklung Basic

Mitglied: adminst

adminst (Level 2) - Jetzt verbinden

20.07.2005, aktualisiert 05.12.2006, 22741 Aufrufe, 6 Kommentare

Hallo zusammen,

Kann mir jemand schnell ein Makro zeigen/posten wo ich sehe, wie man per Makro ein neues Outlook Mail macht und das geöffnete Excel Dokumen als Anhang anfügt.

Mailadresse: test@test.ch
Subject: Neue Büromaterialbestellung
Text; Guten Tag Frau Rommel, es wurde gerade eine neue Büromaterialbestellung erfasst.

Vielen Dank für eure Hilfe!
Mitglied: 8644
21.07.2005 um 09:34 Uhr
Hi,

versuch mal folgendes:

Sub Mail_Senden()
ActiveWorkbook.SendMail "test@test.ch", "Neue Büromaterialbestellung", False

End Sub


Der dritte Parameter legt fest, ob du eine Empfangsbestätigung erhalten willst.

Wie man den Body(Text) sendet habe ich nicht raus gefunden, da kannst du dir vielleicht
mit einer Signatur in OE helfen

Gruß Psycho
Bitte warten ..
Mitglied: adminst
21.07.2005 um 09:36 Uhr
Habe neues Makro Entwickelt:

Sub AktuellesDokument_Als_Email_Senden()

Dim objOutlook As Object
Dim objMail As Object

Set objOutlook = CreateObject("Outlook.Application")
Set objMail = objOutlook.CreateItem(0)

With objMail
.To = "rommel@xyz.ch"
.Subject = "Post ist da!"
.Body = "Das Dokument finden Sie im Anhang." 'Das ist der Text
.Attachments.Add ThisWorkbook.FullName
.Display 'hier geht auch .Send, aber Outlook zeigt dann eine Warnung an "Zugriff durch fremde Anwendung etc."
End With

'Senden der Tastenkombination ALT + S, um die angezeigte Email zu "senden" (liegt danach im Postausgang)
'dies ist nur nötig, wenn Sie oben NICHT .Send verwendet haben, Sie können beide Varianten testen...
SendKeys "%s", True


Set objMail = Nothing
Set objOutlook = Nothing

End Sub
Bitte warten ..
Mitglied: DCM2802
13.09.2005 um 12:39 Uhr
Hallo,
bei den beiden Beispielen hier, habe ich bei Word
Dokumenten das Problem immer die Meldung "Laufzeitfehler 424" - " Objekt erforderlich"
zu bekommen.

Was mache ich falsch?

Gruß
Dirk
Bitte warten ..
Mitglied: adminst
17.09.2005 um 21:55 Uhr
Dieses Makro ist für Excel programmiert (Siehe z.B workbook....)
Bitte warten ..
Mitglied: DCM2802
17.09.2005 um 22:25 Uhr
Ok, das habe ich kapiert. Gibts denn auch eines für WORD?
Bitte warten ..
Mitglied: colinardo
05.12.2006 um 16:31 Uhr
Hallo,
bei den beiden Beispielen hier, habe ich bei
Word
Dokumenten das Problem immer die Meldung
"Laufzeitfehler 424" - "
Objekt erforderlich"
zu bekommen.

Was mache ich falsch?

Gruß
Dirk

Du hast das Dokument vorher nicht gespeichert , und Outlook findet dann keine Datei zum anhängen !!!

für Word nimmst du folgendes Makro:


01.
 
02.
Sub AktuellesDokument_Als_Email_Senden() 
03.
 
04.
Set objOutlook = CreateObject("Outlook.Application") 
05.
   Set objMail = objOutlook.CreateItem(olMailItem) 
06.
   With objMail 
07.
     .To = "rommel@xyz.ch" 
08.
     .Subject = "Post ist da!" 
09.
     .Body = "Das Dokument finden Sie im Anhang." 'Das ist der Text 
10.
     .Attachments.Add ActiveDocument.FullName 
11.
     .Display 
12.
   End With 
13.
End Sub 
14.
 
Bitte warten ..
Ähnliche Inhalte
Microsoft Office
gelöst Excel Makro zum Sortieren von Spalten an größeres Dokument Anpassen (2)

Frage von Rolfor zum Thema Microsoft Office ...

VB for Applications
Excel Makro zum Suchen von Spalten und exportieren in CSV (3)

Frage von Raptox zum Thema VB for Applications ...

Microsoft Office
Excel 2013 Absturz nach öffnen neues Dokument wenn Copyvorgang läuft

Frage von JafThomas zum Thema Microsoft Office ...

VB for Applications
gelöst Ausgewählten Bereich eines Excel Dokumentes per email verschicken (7)

Frage von Edd1ng zum Thema VB for Applications ...

Neue Wissensbeiträge
Humor (lol)

Taschenrechner in IOS kaputt!

(7)

Information von Lochkartenstanzer zum Thema Humor (lol) ...

Sicherheit

Kanadischer Geheimdienst veröffentlicht erstmals Sicherheitssoftware

(3)

Information von BassFishFox zum Thema Sicherheit ...

Virtualisierung

Docker Monitoring und Steuerung per "sen"

Tipp von Frank zum Thema Virtualisierung ...

Heiß diskutierte Inhalte