Abschnittswechsel suchen und ersetzen

Sie haben viele Abschnittswechsel in Ihrem Dokument und die sollen gelöscht werden? Kein Problem mit VBA. Die grundsätzlichen Suchfunktionen kennen Sie ja bereits.

Wechseln Sie in den VBA-Editor und geben in einem neuen Modul den folgenden Code ein:

001
002
003
004
005
006
007
008
009
010
011
012
013
014
015
016

Sub Abschnittswechsel_ersetzen()

   With ActiveDocument.Range.Find
      .Text = "^b"

      With .Replacement
         .ClearFormatting
         .Text = "^p"
      End With

      .Execute Replace:=wdReplaceAll
   End With

End Sub

Hier sehen Sie ein Beispiel, wie man auch andere Ausdrücke, die Sie eventuell bereits aus Word kennen, auch in VBA benutzen kann. Dabei sind alle Kombinationen - auch mit Platzhaltern - möglich.

zurück zur Übersicht Suchen - Ersetzen