Formatierung in VB (Word Macro)

[obi-j]

Hi *,

stehe vor folgendem problem, ich möchte zwei textausgaben unabhangig von einander formatieren (Schriftgröße,Schriftart).

Beispiel:

selection.text = strDoc + CH(10) + strDocb

wie kann ich hier den strDocb in Arial Schriftgröße 8 rauslassen?
das ganze Dokument soll grundsätzlich in Arial 10 stehen

Ich denke das ist für euch eine sehr leichte frage, bin für jede weithilfe sehr dankbar.

 

[Merlin_78]

Hallo

ich denke mal, daß es so am besten funktioniert:

Zuerst den Text ausgeben (Selection.Text) und dann in dem Text nach dem Inhalt der Variablen (strDocb) suchen lassen und dann die Schrift verändern

Selection.Text = strDoc & Chr(10) & strDocb
With Selection.Find
    .Forward = True
    .ClearFormatting
    .MatchWholeWord = True
    .MatchCase = False
    .Wrap = wdFindContinue
    .Execute FindText:=strDocb
End With
Selection.Font.Size = 8

Noch ein Tipp: Wenn du Strings zusammensetzen willst, dann verwende lieber "&"

 

[obi-j]

Großen dank