Word - Text mit bestimmter Formartierung löschen

Computer: Software & Programmierung Office Software
1

Hallo zusammen,

ich habe ein größeres Word File (186 Seiten). Und möchte nun jeden Text der kursiv oder Unterstrichen oder Blau ist löschen. Gibt es dafür einen Befehl oder Makro etc.?

PS: Sind keine Hyperlinks (Unterstrichen oder Blau)

Grüße
dnbma

2

ich habe ein größeres Word File (186 Seiten). Und möchte nun
jeden Text der kursiv oder Unterstrichen oder Blau ist
löschen. Gibt es dafür einen Befehl oder Makro etc.?

Hi dnbma,

teste es mal in einer Kopie deines Dokuments.

Option Explicit
'
Sub Loesch()
Dim W As Range, L As Boolean
For Each W In ActiveDocument.Words
 L = False
 If W.Font.Underline = wdUnderlineSingle Then L = True
 If W.Font.Italic = -1 Then L = True
 If W.Font.Color = wdColorBlue Then L = True
 If L = True Then W.Delete
Next W
End Sub

Gruß
Reinhard

3

Hi,

das kannst du über die „search&replace“-Funktion machen (strg+H). dann: ^? ins Suchfeld (das ist der Platzhalter für ein beliebiges Symbol) und unter Format kursiv angeben. Hier kannst du auch Kombinationen angeben, die dann aber mit UND verknüpft werden. Das Ersetzungsfeld lässt du leer.
Grüße,
JPL

4

OK danke haben beide geklappt.

Grüße dnbma