Programmeren is inderdaad lastig, als je niet gewend bent met macro's
. Ik heb een aangepaste variant meegestuurd nu, waar je verder niks hoeft te klooien aan de bibliotheken. Deze zou dus 'uit de doos' moeten werken.
Stap 1: pak het bestand modMailMergeToEmail_LB.zip uit in een terug te vinden map.
2: start Word, als je dat nog niet gedaan hebt.
3. Klik op <Alt>+<F11> om in de VBA editor te komen. Hier staan je macro's, als je die al hebt gemaakt.
4. Selecteer in het linker venster de groep
Normal (niet Project (Document1)).
4. Klik nu op het menu <Bestand>, <Importeren> (of <Ctrl>+<m>).
5. Blader naar de map waar je de code hebt uitgepakt (modMailMergeToEmail.bas) en klik op <Openen>
De code staat nu als het goed is in de Normal.dot, Onder het kopje <Modules>) zodat je de macro overal kan gebruiken. De module heet
modMailMergeToEmail. Als je dubbelklikt op de module, zie je de macro.
De macro kun je handmatig starten door de cursor in de macro Sub EnhancedMailMergeToEmail() te zetten, en op <F5> te drukken. Er zitten wat checks in om te controleren of je wel in een samenvoegdocument zit.
Wat ik zelf altijd eerst doe met een onbekende macro: Niet <F5> maar <F8>. Dan loopt de macro apart door elke regel code, en elke keer als je op <F8> drukt gaat hij naar de volgende. Dan duurt de uitvoer uiteraard best lang, maar je kunt dan wel zien wat er gebeurt. En als je een paar mailtjes zo hebt gemaakt, kun je alsnog op F8> drukken om de rest in één keer af te spelen.
Begrijpt jouw script hoe mijn Excelbestand heet waar de mailadressen instaan?
Programma's als Word, Excel en PowerPoint zijn prima applicaties waar je een hoop mee kan doen. Maar soms heb je wensen die niet met de standaard functionaliteiten kunnen worden uitgevoerd, en dan ben je vaak al genoodzaakt om ofwel programma's van derden te kopen/gebruiken, ofwel zelf te gaan programmeren. Zonder die twee kun je hooguit wat aan de zijlijn gaan stampvoeten dat 'het programma niet doet wat jij wil', maar dat gaat natuurlijk niet helpen. Je zult jezelf op zijn minst moeten verdiepen in programmeren, als je meer wilt
.
In het script zit géén code die van jouw bestand een samenvoeg document maakt. Wél een check die controleert óf het actieve document goed is ingesteld. En de code controleert vervolgens of de veldnamen wel de juiste gegevens bevatten. Je moet er dus eerst voor zorgen dat je samenvoegdocument op de juiste manier aan het juiste document is gekoppeld.
Verder kijkt de procedure of in het Excel bestand een veld "To" zit, een veld "CC", een veld "Subject" etc. staan, en gebruikt die dan om de juiste gegevens in het document in te vullen. In de macro zie je ergens halverwege de regel "Select Case StripToLcaseLetters(df.Name)" staan, gevolgd door een aantal regels "Case "to"", "Case "subject"" etc. Op die plekken wordt dan wat gedaan.
Uitendelijk zie je dan onderin een blokje met de regels outlookMail.To = toString, outlookMail.Subject = SubjectString etc. die wordt afgesloten met outlookMail.Display. Waarna je de mail dus op het scherm ziet. Een paar regels later wordt de mail verzonden, en gaat de procedure verder met de volgende mail.
Nogmaals: het is prima om wensen te hebben die niet via de standaard functionaliteit kunnen worden opgelost, maar dan moet je wél bereid zijn om je te verdiepen in de (VBA)materie, of iemand in de buurt hebben die het voor je kan implementeren. Ik kan ook niet naar Robin van Persie gaan en vragen of ik in de spits van Feijenoord mag spelen. Ja, ik mag het vragen, maar geheid dat hij vraagt of ik een beetje kan ballen? En als ik dan zeg dat ik dat eigenlijk niet kan, dan gaat het feest denk ik tóch niet door. Eerst oefenen dus!
