2017-12-12 5 views
0

Ich habe Probleme, Teil eines Absatzes in MS WORD fett zu machen. Ich baue ein Dokument Absatz für Absatz. In nur einer von denen möchte ich nur eine Nummer fett machen. Die Nummer kann mehr als einmal im Dokument vorkommen, sollte aber nur einmal in diesem speziellen Absatz fett gedruckt werden.Teil des Absatzes mit vba in ms verblassen Wort

Beispiel:

Mein erster Absatz.

Mein zweiter Absatz.

Meine Nummer ist .

ich Zugriff auf den Absätzen mit dem folgenden Code:

Dim paragraphN As Integer 
paragraphN = 3 
ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range 

Ich weiß, don `t wie nur einen Teil dieser bestimmten Absatz zu spezifizieren. Ich habe versucht:

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range(Start:=14, End:=17).Font.Bold = True 

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range.Characters(Start:=14, End:=17).Font.Bold = True 

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Characters(Start:=14, End:=17).Range.Font.Bold = True 

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Characters.Range(Start:=14, End:=17).Font.Bold = True 

ActiveDocument.Sections(1).Range.Paragraphs(paragraphN).Range(14,17).Font.Bold = True 

Alle fehlgeschlagen. Das Problem scheint ziemlich einfach, aber ich bin aus Ideen ...

Antwort

1

Ich konnte es bekommen mit einer etwas anderen Methode zu arbeiten:

ActiveDocument.Range(ActiveDocument.Paragraphs(1).Range.Characters(5).Start, _ 
    ActiveDocument.Paragraphs(1).Range.Characters(10).End).Font.Bold = True 

Sie können die Absatzzahl und Zeichenzahl einstellen mit Variablen.

+0

Das bedeutet also, dass 'Range'-Objekt sich irgendwie unterscheidet, je nachdem, wo es benutzt wurde, bin ich richtig? – Siemkowski

Verwandte Themen