Kommas in ein Word Dokument

[Nicole]

Hallo

Brauche Eure Hilfe.
Ich habe ein Word Dokument mit einem Makro. Dieses Makro liest aus einer Datenbank Daten in die Wordvorlage. In dieser Vorlage werden z.B mehre Namen hintereinander eingetragen diese sollen durch ein Komma getrennt werden
Kann mir jemand sagen wie das Funktioniert?

Hier der Anfand des Makros
:

Sub AddDocVariables()
'
' AddDocVariables Makro
' Makro erstellt am 18.12.03 von Farm10_tse
'
ActiveDocument.Variables("XERI_Department1").Value = " "
ActiveDocument.Variables("XERI_Department2").Value = " "
ActiveDocument.Variables("XERI_Department3").Value = " "
ActiveDocument.Variables("XERI_Department4").Value = " "
ActiveDocument.Variables("XERI_Department5").Value = " "
ActiveDocument.Variables("XERI_Department6").Value = " "
ActiveDocument.Variables("XERI_Department7").Value = " "
ActiveDocument.Variables("XERI_Department8").Value = " "
ActiveDocument.Variables("XERI_Department9").Value = " "
ActiveDocument.Variables("XERI_Department10").Value = " "


ActiveDocument.Variables("XERI_Editor1").Value = " "
ActiveDocument.Variables("XERI_Editor2").Value = " "
ActiveDocument.Variables("XERI_Editor3").Value = " "
ActiveDocument.Variables("XERI_Editor4").Value = " "
ActiveDocument.Variables("XERI_Editor5").Value = " "
ActiveDocument.Variables("XERI_Editor6").Value = " "
ActiveDocument.Variables("XERI_Editor7").Value = " "
ActiveDocument.Variables("XERI_Editor8").Value = " "
ActiveDocument.Variables("XERI_Editor9").Value = " "
ActiveDocument.Variables("XERI_Editor10").Value = " "

ActiveDocument.Variables("XERI_Reviewer1").Value = " "
ActiveDocument.Variables("XERI_Reviewer2").Value = " "
ActiveDocument.Variables("XERI_Reviewer3").Value = " "
ActiveDocument.Variables("XERI_Reviewer4").Value = " "
ActiveDocument.Variables("XERI_Reviewer5").Value = " "
ActiveDocument.Variables("XERI_Reviewer6").Value = " "
ActiveDocument.Variables("XERI_Reviewer7").Value = " "
ActiveDocument.Variables("XERI_Reviewer8").Value = " "
ActiveDocument.Variables("XERI_Reviewer9").Value = " "
ActiveDocument.Variables("XERI_Reviewer10").Value = " "

So schaut der Kopf der Vorlage aus ( in tabellenform)
Prüfer1 Prüfer2 ... werden durch Namen ersetzt und dazwischen sollen Kommas stehen.


Titel Title
Codierung Codierung
Version Version
Dokumententyp Type
Status Status
Autor Autor
Prüfer Prüfer1 Prüfer2 Prüfer3 Prüfer4
Genehmiger Genehmiger1 Genehmiger2 Genehmiger3
Letzter Freigeber Letzter Freigeber
Koordinationsstelle Koordinationsstelle
Geltungsbereich Geltungsbereich1 Geltungsbereich2 Geltungsbereich3
Gültig ab Gültigkeitsdatum
Achtung Ausdruck ist unkontrolliert und dient nur zur Referenz.


Besten Dank mal

Grüsse Nicole

 

[thekorn]

check ich nicht.

ich verstehe nicht ganz was du meinst, aber könnte mir vorstellen, das du das ganze mit seriendruck viel leichter lösen könntest

gruß
thekorn