Macro: Spatie vervangen

[Jorediej]

Ik maak gebruik van Macro's om gegevens uit een excel bestand te halen.
Nu haal ik bijvoorbeeld de naam van een medewerker hieruit: Jan Klaassen

ActiveDocument.FormFields("Veld_NaamMM1").Result = Medewerker

Vervolgens wil ik het volgende veld vullen met het emailadres:

ActiveDocument.FormFields("Veld_EmailMM").Result = Mederwerker & "@klaassen.nl"

Nu krijg ik als emailadres: Jan Klaassen@klaassen.nl (met spatie ertussen)

Nu wil ik echter nog de spatie vervangen door een punt zodat het veld meteen wordt gevuld met: Jan.Klaassen@klaassen.nl

Kan iemand mij vertellen hoe ik dit doe?

 

[OctaFish]

Dat zou ik dan toch in het Excel bestand regelen; daar kun je vast een email adres samenstellen op basis van Voornaam+Tussenvoegsel+Achternaam. En dan zet je daar punten tussen.

 

[Jorediej]

Het probleem is dat er in excel niets aangepast kan worden.
Het excel is namelijk het bronbestand wat voor veel verschillende applicaties wordt gebruikt.
Is er een manier om dit in met word macro's te doen?

 

[OctaFish]

Nauwelijks; je kunt nog wel met zoeken en vervangen de spatie in de uitkomst vervangen door een punt, maar daar heb je weinig aan als het gaat om het vervangen van tekens binnen een veld. Als je aan het bronbestand niks kan sleutelen, zou ik zelf een bestand maken met een koppeling naar het bronbestand. Daarin kun je dan de juiste formules maken, samenvoegen en Bingo!