5
OUTLOOK Automatisch Mail/FAX Antworten
Antwort-MACRO
Hallo,
hab ein riesen Problem...
Ich habe einen Kunden, der SerienFAXe über Outlook verschickt.
Wenn die FAXe nich zugestellt werden konnten, schiebt er sie in den "nicht gesendete FAXe" -Ordner.
So, gestern wurden die letzen FAXe zugestellt und als ich dann in den "nich gesendete FAXe" -Ordner reingeguckt habe, bekamm ich fast n Herzinfarkt ;)
= 1648 nicht gesendete FAXe...
Jetzt will ich mich da auch nich hinsetzen und jedes FAX einzeln anklicken -> ANTWORTEN ...
auch wollte ich da keinen für 1 EUR Job für einstellen ;)
Bin grad dabei mir ein MAKRO zu schreiben... weiss aber nich weiter.
SourceCode:
Sub Email_Weiterleitung()
Dim i As Integer
Dim j As Integer
'Alle Mails durchlaufen
i = 1
j = oFolder.Items.Count
Do While j > 0
Set oMail = oFolder.Items(j)
summe = summe + 1
Loop
Ich weiss beim besten Willen nich, wie ich weiter vorgehen soll.
Hab VBA nur in Verbindung mit EXCEL programmiert.
OUTLOOK ist für mich eine ganz neue Materie.
Wenn mir jemand helfen würde/könnte wär ich sehr dankbar.
Ist mir echt wichtig...
mfg
*Eddy*
Hallo,
hab ein riesen Problem...
Ich habe einen Kunden, der SerienFAXe über Outlook verschickt.
Wenn die FAXe nich zugestellt werden konnten, schiebt er sie in den "nicht gesendete FAXe" -Ordner.
So, gestern wurden die letzen FAXe zugestellt und als ich dann in den "nich gesendete FAXe" -Ordner reingeguckt habe, bekamm ich fast n Herzinfarkt ;)
= 1648 nicht gesendete FAXe...
Jetzt will ich mich da auch nich hinsetzen und jedes FAX einzeln anklicken -> ANTWORTEN ...
auch wollte ich da keinen für 1 EUR Job für einstellen ;)
Bin grad dabei mir ein MAKRO zu schreiben... weiss aber nich weiter.
SourceCode:
Sub Email_Weiterleitung()
Dim i As Integer
Dim j As Integer
'Alle Mails durchlaufen
i = 1
j = oFolder.Items.Count
Do While j > 0
Set oMail = oFolder.Items(j)
summe = summe + 1
Loop
Ich weiss beim besten Willen nich, wie ich weiter vorgehen soll.
Hab VBA nur in Verbindung mit EXCEL programmiert.
OUTLOOK ist für mich eine ganz neue Materie.
Wenn mir jemand helfen würde/könnte wär ich sehr dankbar.
Ist mir echt wichtig...
mfg
*Eddy*
Auf Facebook teilen
Auf X (Twitter) teilen
Auf Reddit teilen
Auf Linkedin teilenBitte markiere auch die Kommentare, die zur Lösung des Beitrags beigetragen haben
Content-ID: 29712
Url: https://administrator.de/forum/outlook-automatisch-mail-fax-antworten-29712.html
Ausgedruckt am: 23.04.2025 um 16:04 Uhr
5 Kommentare
Neuester Kommentar
mir ist ehrlich gesagt nicht klar was du damit erreichen wilst...
Hi,
die FAXe sind nich rausgegange, also muss ich die wieder verschicken.
Weil das aber ein Serienfax ist, will ich mich nich hinseten und die jeweiligen FAXnummern
raussuchen um die FAXe noch einmal zu verschicken...
Wenn ein FAX nich angekommen ist, bekomm ich ein Antwortfax, mit dem gleichen Inhalt, was der empfänger bekommen sollte.
Also würde es reichen, wenn ich einfach auf ANTWORTEN klicke und dann auf SENDEN.
hoffe das war etwas verständlicher...
-wenn nich, einfach noch mal schreiben...
Danke für die Mühe...
die FAXe sind nich rausgegange, also muss ich die wieder verschicken.
Weil das aber ein Serienfax ist, will ich mich nich hinseten und die jeweiligen FAXnummern
raussuchen um die FAXe noch einmal zu verschicken...
Wenn ein FAX nich angekommen ist, bekomm ich ein Antwortfax, mit dem gleichen Inhalt, was der empfänger bekommen sollte.
Also würde es reichen, wenn ich einfach auf ANTWORTEN klicke und dann auf SENDEN.
hoffe das war etwas verständlicher...
-wenn nich, einfach noch mal schreiben...
Danke für die Mühe...
habe dein Problem jetzt zwar verstanden, aber nur bedingt eine Lösung da ich dne Fax Versand mit Outlook nicht genau kenne.
Aber es müsste doch analog zur E-Mail einen Ordner Faxausgang geben, bei Mail heißt der halt PostAusgang.
Geht es nicht alle Faxe in den betrffenden Ordner zu kopieren und dann einfach nochmal zu übertragen????
Aber es müsste doch analog zur E-Mail einen Ordner Faxausgang geben, bei Mail heißt der halt PostAusgang.
Geht es nicht alle Faxe in den betrffenden Ordner zu kopieren und dann einfach nochmal zu übertragen????
aber wie kann ich alle FAXe die eingegangen sind an die Adresse schicken, von welcher die grade gekommen sind?
Wenn ich mehrer makiere, kann ich nich auf ANTWORTEN klicken.
Bin stark davon ausgegangen, dass ich das nur mit einem Makro schaffe.
Der Verlauf ist genau so die mit einer Mail, nur das oben eine FAX-Nummer als Empfänger drin steht.
Hättest du vielleicht einen Source zum Probieren?
Ich weiss nich mehr weiter.
Werde mich wahrscheinlich heute nach per Fernwartung einwählen müssen und die FAXe händisch verschicken ;)
Nochmals danke für jede Antwort...
Wenn ich mehrer makiere, kann ich nich auf ANTWORTEN klicken.
Bin stark davon ausgegangen, dass ich das nur mit einem Makro schaffe.
Der Verlauf ist genau so die mit einer Mail, nur das oben eine FAX-Nummer als Empfänger drin steht.
Hättest du vielleicht einen Source zum Probieren?
Ich weiss nich mehr weiter.
Werde mich wahrscheinlich heute nach per Fernwartung einwählen müssen und die FAXe händisch verschicken ;)
Nochmals danke für jede Antwort...
wenn der Verlauf der selbe ist wie bei einer E-Mail müsste es doch gehen wenn du alle noch nicht gesendeten Faxe in den Ordner Entwürfe verschiebst und dann einfach alle Faxe markeirst und erneut sendest
