Hallo zusammen,
ich bin VBA Neuling und hätte eine Frage.
Ich habe eine Excel Datei in der viele Zellen mit Text befüllt sind. Über ein Button wird ein bereits gespeichertes Word Dokument mit vorhandenen Textmarken geöffnet und die Textmarken werden mit gewünschten Zellen beschrieben.
Nun zu meiner Frage:
Ist es denn möglich, dass die Schriftart, Schriftgröße, fett/kursiv, so wie es in der Excel Tabelle ist auch in Word übertragen wird? Mein Problem ist, dass in Excel verschiedene Schriftgrößen verwendet sind in Word dann allerdings überall Schriftgröße 11 ist, was etwas unschön für meinen Zweck ist.
Falls es was hilft stelle ich noch meinen Code, wie ich die Textmarken beschreibe rein.
'Hier werden die Textmarken beschrieben
Dim b As Integer
For b = 1 To 50
With wdDoc
.Bookmarks("Textmarke1_" & b).Range = ActiveWorkbook.Worksheets("Tabelle1").Range("a" & b)
.Bookmarks("Textmarke2_" & b).Range = ActiveWorkbook.Worksheets("Tabelle1").Range("c" & b)
.Bookmarks("Textmarke3_" & b).Range = ActiveWorkbook.Worksheets("Tabelle1").Range("g" & b)
End With
Next b
MfG
Marc |