afdruk samenvoegen naar e-mail vanuit Word met MET bijlage EN behoud van mooie opmaak (1)
Sabine
Hallo allemaal,
ik wordt er helemaal gek van: heb via Slipstick.com een artikel gevonden om
Afdruk samen te voegen vanuit Word naar Outlook, met bijlagen:
http://word.mvps.org/faqs/mailmerge/MergeWithAttachments.htm
De code daar overgenomen een aangepast, en in eerste instantie lukt het wel.
Echter zijn er 2 problemen:
Probleem 1: ik verlies de mooie opmaak van mijn Word brief (heb een brief
met tabellen en verschillende opmaakstijlen (vet / kleinere /grotere
letters), terwijl de mailtjes allemaal in de HTML opmaak verstuurd worden.
Hier de originele code met de aanpassingen die ik al uitgeprobeerd heb (in
de gekenmerkte regels):
...
' Iterate through the Sections of the Source document and the rows of the
catalog mailmerge document,
' extracting the information to be included in each email.
For j = 1 To Source.Sections.Count - 1
Set oItem = oOutlookApp.CreateItem(olMailItem)
With oItem
.BodyFormat = olFormatHTML '<======
deze regel heb ik zelf tussengevoegd
.Subject = mysubject
.Body = Source.Sections(j).Range.Formattedtext '< ====== hier
.Text vervangen door .Formattedtext
Set Datarange = Maillist.Tables(1).Cell(j, 1).Range
Datarange.End = Datarange.End - 1
.To = Datarange
For i = 2 To Maillist.Tables(1).Columns.Count
Set Datarange = Maillist.Tables(1).Cell(j, i).Range
Datarange.End = Datarange.End - 1
.Attachments.Add Trim(Datarange.Text), olByValue, 1
Next i
.Send
End With
Set oItem = Nothing
Next j
Maillist.Close wdDoNotSaveChanges
.....
(overige code zie MVP artikel op
http://word.mvps.org/faqs/mailmerge/MergeWithAttachments.htm)
Ik heb van alles geprobeerd, maar steeds wordt de body van mijn e-mail in
plain text getoont, dus alle opmaak is weg uit de body. Als ik echter zonder
deze MVP-macro vanuit Word naar e-mails samenvoeg, gewoon met samenvoegen
naar e-mail, dan heb ik wel de mooie body met alle tabellen en opmaak. Maar
dan mis ik de bijlagen, de reden waarom ik juist deze code wil gebruiken.
Wie oh wie weet hoe ik vanuit Word 2003 naar e-mails kan samenvoegen, MET
bijlage, en met behoud van de mooie 'body', dus even mooi als middels afdruk
samenvoegen naar e-mail?.
2. Probleem:
ik werk op een Exchange server, met maar ��n account. Ik ben echter
gemachtigt om namens onze afdeling mails te versturen. Nu wil ik met behulp
van mijn macro als afzender niet mijn eigen naam, maar (als reply adres) het
mailadres van onze afdeling gebruiken. Iets wat ik normaal via het veld
'Van' zou kunnen instellen'. Als ik bij
With oItem
.SenderEmailAddress = onzeaf...@xxx.nl
end With
wil gebruiken, werkt dat niet omdat SenderEmailAddress een alleen-lezen
eigenschap is. Hoe kan ik met VBA bij mijn mailmerge de naam de afzender
aanpassen?
G�rard Oomens, een idee? Ik weet niet meer wat ik nog moet uitproberen ....
Alvast bedankt,
Sabine
...
G�rard Oomens
<sabinezpVE...@zonnet.nl> wrote:
>G�rard Oomens, een idee? Ik weet niet meer wat ik nog moet uitproberen ....
Helaas ik heb geen idee, maar wellicht kun je als niemand anders een
suggestie heeft eens proberen in een Engelse meer specifieke groep:
microsoft.public.word.mailmerge.fields
En wellicht ook hier informeren/zoeken:
http://www.outlookcode.com/
--
G�rard
Sabine
bedankt voor je snelle reactie! Jammer dat je zelf geen oplossing weet, maar
toch bedankt voor de goede link. Ik zie dat hier meer mensen al
(engelstalig) met het zelfde probleem zaten, dus dat wordt nog een nacht
puzzelen en dan hoop ik iets te vinden.
Met vriendelijke groeten
"G�rard Oomens" <gj....@inter.nl.net> schreef in bericht
news:vuhrg5ltpm2mh816b...@4ax.com...
Rutger
"Sabine" <sabinezpVE...@zonnet.nl> schreef in bericht
news:%23zCPJmi...@TK2MSFTNGP02.phx.gbl...
Is het echt nodig om NAAR outlook samen te voegen en niet andersom, dus naar
word? Of zeg ik nu iets doms?
Groeten,
Rutger
Saskia
>
> Ik heb van alles geprobeerd, maar steeds wordt de body van mijn e-mail in
> plain text getoont, dus alle opmaak is weg uit de body. Als ik echter zonder
> deze MVP-macro vanuit Word naar e-mails samenvoeg, gewoon met samenvoegen
> naar e-mail, dan heb ik wel de mooie body met alle tabellen en opmaak. Maar
> dan mis ik de bijlagen, de reden waarom ik juist deze code wil gebruiken.
>
> Wie oh wie weet hoe ik vanuit Word 2003 naar e-mails kan samenvoegen, MET
> bijlage, en met behoud van de mooie 'body', dus even mooi als middels afdruk
> samenvoegen naar e-mail?.
>
> 2. Probleem:
> gemachtigt om namens onze afdeling mails te versturen. Nu wil ik met behulp
> van mijn macro als afzender niet mijn eigen naam, maar (als reply adres) het
> mailadres van onze afdeling gebruiken. Iets wat ik normaal via het veld
> 'Van' zou kunnen instellen'. Als ik bij
>
> With oItem
> end With
>
> wil gebruiken, werkt dat niet omdat SenderEmailAddress een alleen-lezen
> eigenschap is. Hoe kan ik met VBA bij mijn mailmerge de naam de afzender
> aanpassen?
>
>
> Alvast bedankt,
>
> Sabine
>
> ...
Hoi Sabine,
Ik heb hetzelfde probleem dat ik mails wil versturen vanuit een ander
emailadres, maar kan het ook niet vinden. Heb jij misschien al iets
gevonden?
Weet jij hoe dit moet?
Alvast heel erg bedankt!
Met vriendelijke groet,
Saskia