Hallo Spider VW,
Zeilen können in VBA-Word nicht direkt ausgewählt werden, wohl aber Absätze (ActiveDocument.Paragraphs(AbsatzNr)). Die n-te Zeile kann aber wie folgt markiert werden:
n = Zeilennummer
With Selection
.HomeKey wdStory
.MoveDown wdLine, n - 1
.EndKey wdLine, 1
.MoveLeft 1, 1, 1 ‘um die Absatzmarke aus der Markierung zu entfernen, falls erforderlich
End With
Die Übernahme in eine Variable a kann mit a=Selection.Text erfolgen.
Die Prüfung, welcher Inhalt für a vorliegt, kann mit If-Then-Else-End If erfolgen.
Ein markierter Bereich kann formatiert werden, indem z.B. die Eigenschaften des Font-Objektes bearbeitet werden.
Mit Hilfe der VBA-Hilfe zu den Stichwörtern sollte es jetzt möglich sein, dein Vorhaben zu realisieren.
Gruß
Holger
|