email ontvangen in userform

[Spiesse]

op het net is héél wat te vinden over het sturen van emails via textboxen en dergelijke, met bijlage, enz...

Dit alles lukt me en heb ik alsdus niet meer nodig...

wat ik eventueel wel wil gebruiken, maar nergens iets rond vind in principe, is hoe je mail kan inlezen in een userform.

Dus dat achter een commandbutton een macro zit die bv in een listbox of textbox (eender wat) de body van een mail binnenhaalt...

kan dit?


groeten,
spiesse

 

[MirjamHelp]

Hallo Spiesse,

Goed nieuws: Ja dat kan, ik gebruik het zelf ook.
Slecht nieuws: Ik kan je op dit moment niet aan de code ervan helpen.

Maar kijk eens op de site van Sue Mosher. Als je nog wat geduld hebt zal ik het later opzoeken of misschien dat iemand anders je al verder kan helpen.

Gr. Mirjam

 

[Spiesse]

hallo Mirjam,

das idd goed en slecht nieuws tegelijk

lukt het ook met een mail van specifieke personen of groepen of mapnamen en dergelijke?

 

[snb]

Dat staat allemaal al hier:

http://www.snb-vba.eu/VBA_Outlook_external.html#L157

 

[Spiesse]

hoi SNB,

welk stukje is voor mij van toepassing dan om mail van een specifiek persoon of mailadres te filteren?

 

[snb]

Ik had je toch naar het Nederlandstalige deel gestuurd ?

 

[Spiesse]

idd SNB, maar is me nog niet helder welke het meest past bij wat ik zoek.

mails van 1 specifiek persoon zien in listbox en verwijderen uit inbox

 

[Spiesse]

SNB,

ik kom er niet uit hoor... Helaas

ik heb de verwijzing Outlook 14.0 library aangevinkt voor de zekerheid in vba

dan een macro geprobeerd maar noppes...

vrees dat ik iets meer hulp ga nodig hebben dan jouw link... srry

 

[snb]

Dat lijkt me niet erg verstandig om mails te verwijderen uit de InBox.
Verplaatsen naar een andere outlook map lijkt me veiliger.

 

[Spiesse]

verplaatsen is ook ok, ben niet zo moeilijk

dus in principe heb ik dit voor ogen: klik op een cmdbutton kijkt of in een bepaalde map een mail zit en de inhoud ervan tonen in een listbox.

kan dit, en met welke stukjes code van op jouw vba-pagina?

 

[Spiesse]

Snb,

na lang proberen is het me gelukt om mails in een submap in een label te toveren.

Nu probeer ik om enkel de ongelezen mail(s) tevoorschijn te toveren, maar dit lukt me niet.

Ik vermoed dat het ergens met c09 te maken heeft? of met .unread?

Voorlopig heb ik deze code die in een label de mail toont die voldoet aan de voorwaarde. Nu wil ik dus de voorwaarde unread = ja aan toevoegen...

Sub mailja()
On Error Resume Next

c00 = "hier staat de naam van de verzender"

With CreateObject("Outlook.Application").GetNamespace("MAPI").GetDefaultFolder(6).Parent.Folders("naam folder X").Folders("naam submap Y").Items

c01 = .Find("[Sendername]='" & c00 & "'").body
Do Until Err.Number <> 0
c01 = c01 & "|" & .FindNext.body
Loop
End With
Label94.Caption = c01
End Sub

vermoedelijk zal het iets simpels zijn maar ik geraak er niet
alvast dank!