Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Mail Speichern als msg mit VBA

969 views
Skip to first unread message

Matthias Edegger

unread,
Jun 23, 2004, 4:02:27 AM6/23/04
to
Hallo,

ich möchte meine Mails im msg Format auf der Festplatte
speichern.
Wie kann ich Outlook sagen, nimm das (die) markierte(n)
Mail(s) und mach dann das SaveAs...

Oder könnte man das Makro auch mit Drag and Drop
aktivieren (wenn ich die Mail auf einen Ordner ziehe, das
dann automatisch das Makro ausgeführt wir), wenn ja wie?

(habe OL 2003)

mfg
Matthias

Michael Bauer

unread,
Jun 24, 2004, 1:47:58 AM6/24/04
to
Hallo Matthias,

>ich möchte meine Mails im msg Format auf der Festplatte
speichern.

>Oder könnte man das Makro auch mit Drag and Drop
aktivieren

Warum probierst Du das nicht einfach mal aus? Markiere eine Mail und
ziehe sie z.B. auf ein Ordnersymbol auf dem Desktop!

--
Viele Grüße
Michael Bauer

ME

unread,
Jun 24, 2004, 3:58:22 AM6/24/04
to
Hallo,
das ist klar, dass das mit der Maus geht, es wird aber
immer nur der Betreff als Dateiname genommen, ich möchte
das aber ändern. Mit einem Makro oder Reg Eintrag, wie
auch immer!

mfg

>-----Originalnachricht-----

>.
>

Michael Bauer

unread,
Jun 24, 2004, 7:23:24 AM6/24/04
to
Hallo Matthias,

> das ist klar, dass das mit der Maus geht, es wird aber
immer nur der Betreff als Dateiname genommen, ich möchte
das aber ändern. Mit einem Makro oder Reg Eintrag, wie
auch immer!

Wie konnte ich das in Deinem Eingangsposting bloß überlesen?

Mit einem kleinen Makro in VBA geht das im Prinzip so:
Application.ActiveExplorer.Selection.Count liefert Dir die Anzahl
selektierter Elemente; diese Liste kannst Du mit For-Next durchlaufen
und jedes Element mit der SaveAs-Methode speichern. Du brauchst Dir nur
noch einen geeigneten Namen zu suchen, z.B. die Subject-Eigenschaft, und
den gewünschten Pfad davorzustellen. Bsp.: "c:\verzeichnis\" &
MailItem.Subject

Darüberhinaus solltest Du Maßnahmen treffen, falls eine zu speichernde
Mail namentlich bereits im gewählten Verzeichnis existiert. Es kommt ja
durchaus vor, dass sich im Mailordner mehrere, inhaltlich
unterschiedliche Mails mit gleichen Betreff befinden.

Matthias Edegger

unread,
Jun 24, 2004, 9:05:14 AM6/24/04
to
Ja Danke, das hilft mir schon weiter!!

mfg
Matthias

>-----Originalnachricht-----

>Application.ActiveExplorer.Selection.Count liefert Dir
die Anzahl
>selektierter Elemente; diese Liste kannst Du mit For-Next
durchlaufen
>und jedes Element mit der SaveAs-Methode speichern. Du
brauchst Dir nur
>noch einen geeigneten Namen zu suchen, z.B. die Subject-
Eigenschaft, und
>den gewünschten Pfad davorzustellen.
Bsp.: "c:\verzeichnis\" &
>MailItem.Subject
>
>Darüberhinaus solltest Du Maßnahmen treffen, falls eine
zu speichernde
>Mail namentlich bereits im gewählten Verzeichnis
existiert. Es kommt ja
>durchaus vor, dass sich im Mailordner mehrere, inhaltlich
>unterschiedliche Mails mit gleichen Betreff befinden.
>
>--
>Viele Grüße
>Michael Bauer
>

>.
>

Christian Freßdorf

unread,
Jun 24, 2004, 9:32:30 AM6/24/04
to
Hallo Matthias,

> Ja Danke, das hilft mir schon weiter!!

vielleicht erfü+llt ja folgendes Deine Anforderungen:
http://www.chf-online.de/ol/olvbamailspeichern.htm

--
Gruß Christian
~~~~~~~~~~~~
Antworten / Rückmeldungen nur in die NG!
http://www.mvps.org/word/FindHelp/Posting.htm
http://support.microsoft.com/default.aspx?scid=fh;DE;NGNetikette

0 new messages