Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
28.06.2005 15:42:54 |
at2oo1 |
|
|
|
28.06.2005 16:06:05 |
Rasta |
|
|
|
28.06.2005 16:22:08 |
at2oo1 |
|
|
Aw:Aw:Aw:Outlook 2000 - HTML Mails beim Eingang in |
28.06.2005 16:40:34 |
Rasta |
|
|
Von:
Rasta |
Datum:
28.06.2005 16:40:34 |
Views:
1127 |
Rating:
|
Antwort:
|
Thema:
Aw:Aw:Aw:Outlook 2000 - HTML Mails beim Eingang in |
Hallo at2001,
"Private WithEvents olNachrichten As Items"
dimensioniert die variable as ITEMS
demnach müsste es so lauten:
Set olNachrichten = objMAPI.
.Folders("irgendein Ordner").Items
hast du das so?
viele grüße
rasta
at2oo1 schrieb am 28.06.2005 16:22:08:
Hallo Rasta,
vielen Dank für deine zügige Antwort.
Die E-Mails werden per Outlook Regel in "Old Contacts" kopiert.
Ich habe gerade herrausgefunden das dann wohl dieses Event:
"Private WithEvents olNachrichten As Items"
nicht mehr ausgeführt wird, gibt es hier eine möglichkeit das Event so anzupassen das es beim Kopieren vom Posteingang per Regel in "Old Contacts" trotzdem ausgelöst wird?
Vielen Dank.
MfG
at2oo1
Rasta schrieb am 28.06.2005 16:06:05:
Hallo at2001,
ersetze
GetDefaultFolder(olFolderInbox)
mit
.Folders("Old Contacts")
oder
du prüfst die regeln selbst ab- je nachdem was im betreff steht, bzw. wer der absender ist
hoffe es hilft
viele grüße
rasta
at2oo1 schrieb am 28.06.2005 15:42:54:
Hallo,
ich habe im Netz ein Makro gefunden welches beim eingang einer Mail in den "Posteingang" Ordner diese in Text umwandelt! Soweit funtioniert es super:
[Code]
Private WithEvents olNachrichten As Items
Private Sub Application_Startup()
Dim objMAPI As NameSpace
Set objMAPI = Application.GetNamespace("MAPI")
Set olNachrichten = objMAPI.GetDefaultFolder(olFolderInbox).Items
Set objMAPI = Nothing
End Sub
Private Sub olNachrichten_ItemAdd(ByVal Item As Object)
On Error Resume Next
With Item
If .HTMLBody <> "" Then
.Body = .Body
.Save
End If
End With
Set Item = Nothing
End Sub
Private Sub Application_Quit()
Set olNachrichten = Nothing
End Sub
[/Code]
Mein problem bei der ganzen sache ist: Ich möchte nicht alle mails die im Post Eingang landen uwmandeln sonder welche die per regel beim empfang in einen speziellen ordner verschoben oder kopiert wurden. Kann mir hier jemand helfen? hab fast keine ahnung von vba.
Danke
at2oo1
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
|
28.06.2005 15:42:54 |
at2oo1 |
|
|
|
28.06.2005 16:06:05 |
Rasta |
|
|
|
28.06.2005 16:22:08 |
at2oo1 |
|
|
Aw:Aw:Aw:Outlook 2000 - HTML Mails beim Eingang in |
28.06.2005 16:40:34 |
Rasta |
|
|