Top-Themen

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

gelöst Mails automatisiert mit Anhang verschicken per Outlook VBA-Skript

Mitglied: ITSITS

ITSITS (Level 1) - Jetzt verbinden

10.10.2013, aktualisiert 14.10.2013, 3699 Aufrufe, 3 Kommentare

Hallo liebe Leute,

habe ein kleines VBA Skript welches automatisiert Mails verschicken soll.
Dafür wird Outlook 2007 verwendet. Mein Problem ist, dass es im Internet immer heißt "Legen Sie eine Erinnerung im Kalender mit Aussagekräftigen Namen an" oder Legen Sie eine Aufgabe an ....
Damit kann ich als "nicht VBA" experte leider nichts anfangen ....
Daher hoffe ich, dass mir jemand weiterhelfen kann und mich aufklären kann.
Über eine Antwort würde ich mich sehr freuen!

Der VBA Code:

Private Sub Application_Reminder(ByVal Item As Object)
SendAutoEmail Item
End Sub

Private Sub SendAutoEmail(Item As Object)
Dim oTask As Outlook.TaskItem
Dim oMail As Outlook.MailItem
Dim oFld As Outlook.MAPIFolder
Dim ReminderSubject As String
Dim EmailSubject As String
Dim SendTo As String
Dim Message As String

'Task item
ReminderSubject = "DailyMailReminder"

'Email
SendTo = "blabla@DeineDomäne.de"
EmailSubject = "Test"
Message = "this message was sent automatically"

If TypeOf Item Is Outlook.TaskItem Then
Set oTask = Item
If LCase$(oTask.Subject) = LCase$(ReminderSubject) Then

'Set next reminder
oTask.ReminderTime = DateAdd("d", 1, oTask.ReminderTime)
oTask.Save

'Create email
Set oMail = Application.CreateItem(olMailItem)
oMail.Subject = EmailSubject
oMail.Body = Message
oMail.Recipients.Add SendTo
oMail.Recipients.ResolveAll
oMail.Attachments.Add "Z:\Test.txt"
oMail.Send
End If
End If
End Sub
Mitglied: colinardo
12.10.2013 um 10:31 Uhr
Zitat von ITSITS:
Mein Problem ist, dass es im Internet immer heißt "Legen Sie eine Erinnerung im
Kalender mit Aussagekräftigen Namen an" oder Legen Sie eine Aufgabe an ....
Hallo ITSITS,
diese Aussage trifft hier zu da dein Code in dieser Zeile:
If LCase$(oTask.Subject) = LCase$(ReminderSubject) Then
einen Vergleich des "Betreffs" deines Termins vornimmt, d.h. in diesem Fall wird dieser mit der Zeichenfolge "DailyMailReminder" verglichen., d.h. nur wenn diese Bedingung zutrifft wird eine Mail verschickt

Grüße Uwe
Bitte warten ..
Mitglied: ITSITS
14.10.2013, aktualisiert um 09:22 Uhr
Danke, funktioniert!!!
Bitte warten ..
Mitglied: colinardo
14.10.2013 um 09:34 Uhr
Dann Beitrag bitte noch als gelöst markieren. Danke.
Grüße Uwe
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Skript zum E-Mail Anhang ausdrucken
gelöst Frage von NetzuserBatch & Shell5 Kommentare

Hallo zusammen, ich bin auf der Suche nach einem Skript das als Dienst und Client unabhängig auf meinem Exchange ...

Outlook & Mail

Outlook vba Email Anhang in Ordner speichern

gelöst Frage von DaywalkercxpOutlook & Mail3 Kommentare

Liebe Community, Ich bin am verzweifeln, da ich einfach nicht auf die Lösung komme. Daher hoffe ich das es ...

VB for Applications

Mehrere Mail Vorlagen in VBA Skript verwenden

gelöst Frage von o0Asia0oVB for Applications4 Kommentare

Hallo zusammen Ich würde gerne ein Skript anpassen, jedoch komme ich darauf nicht ganz klar Das Skript soll folgendes ...

VB for Applications

VBA Outlook - Mail delivery system

gelöst Frage von carolin.zeldaVB for Applications5 Kommentare

Hallo zusammen, und zwar habe ich folgendes Problem: Wir arbeiten mit einem Newslettersystem und bekommen sehr oft Emails zurück, ...

Neue Wissensbeiträge
Humor (lol)

"Linux und 5 Gründe Warum man kein Windows verwenden sollte sondern Ubuntu Linux"

Tipp von Snowbird vor 1 TagHumor (lol)8 Kommentare

Gerade gefunden. Ja, ist etwas älter, aber irgendwie lustig?

Humor (lol)

"Warum Linux in einer vernetzten Welt einfach keinen Komfort bietet!"

Tipp von Snowbird vor 2 TagenHumor (lol)13 Kommentare

Ein interessanter Einblick warum Linux nichts für Geräteübergreifende Arbeit ist :)

Humor (lol)
Zuviel Speicher ist ungesund. :-)
Tipp von Lochkartenstanzer vor 2 TagenHumor (lol)17 Kommentare

Moin Kollegen, Heute hatte ich ein ungewöhnliches Aha-Erlebnis: Über das Wochenende habe ich einen einen 6 Jahre alten Bare-Metal ...

Windows Update

KB4517297 verfügbar, behebt Fehler in VB6 VBA VBScript

Information von sabines vor 2 TagenWindows Update

Das Update behebt mögliche Fehler in VB6, VBA und VBScript, die durch das Update KB4512486 vom August entstanden sind. ...

Heiß diskutierte Inhalte
Router & Routing
Deinstalliertes Geräte wird in FritzBox noch immer als verbundenes Gerät angezeigt
gelöst Frage von imebroRouter & Routing18 Kommentare

Hallo, in meiner FritzBox 7490 wird im Bereich "Funknetz" ein Gereät bei den verbundenen Geräten angezeigt, wobei ich nicht ...

Windows 10
Windows 10 druckt nicht mehrere Kopien?
Frage von StefanKittelWindows 1015 Kommentare

Hallo, ich hatte gerade einen Anruf eines Kunden. Sein neuer PC (Win 10 1903) druckt nicht mehr mehrere Seiten ...

Verschlüsselung & Zertifikate
Mit BitLocker verschlüsselte Festplatte löschen?
gelöst Frage von SnowbirdVerschlüsselung & Zertifikate14 Kommentare

Hallo, ich habe eine mit Bitlocker verschlüsselte externe Festplatte. Diese möchte ich gerne löschen sodass nichts mehr auffindbar ist. ...

Sonstige Systeme
Ist es möglich ein ISDN-Telefon an einen analogen Anschluss anzuschließen?
Frage von cramtroniSonstige Systeme14 Kommentare

Also anders herum geht es ja, da gibt es ja diese Adapter von RJ11 auf TAE-F, aber gibt es ...