Thomas: Die Seite wurde neu angelegt: „'''Delete empty paragraphs''' (DelEmptyParas) ist ein VBA-Unterprogram (MS-Word-Makro), das '''leere Paragrafen''' im aktiven Dokument '''löscht'''.

 Su…“

2017-05-05T05:06:34Z

Die Seite wurde neu angelegt: „'''Delete empty paragraphs''' (DelEmptyParas) ist ein VBA-Unterprogram (MS-Word-Makro), das '''leere Paragrafen''' im aktiven Dokument '''löscht'''. <pre> Su…“

Neue Seite

'''Delete empty paragraphs''' (DelEmptyParas) ist ein VBA-Unterprogram (MS-Word-Makro), das '''leere Paragrafen''' im aktiven Dokument '''löscht'''.

<pre>
Sub DelEmptyParas ()

Dim P As Object
Dim I As Long

I = 0
For Each P In ActiveDocument.Paragraphs
If P.Range.Characters.Count = 1 Then
P.Range.Delete
I = I + 1
End If

Next
MsgBox "Es wurden " & Str(I) & " Zeilen glöscht.", vbOKOnly, "Löschen leerer Paragrafen"
End Sub
</pre>

[[Kategorie:Makro]]
[[Kategorie:MS-Word]]
[[Kategorie:VBA]]

DelEmptyParas - Versionsgeschichte

Thomas: Die Seite wurde neu angelegt: „'''Delete empty paragraphs''' (DelEmptyParas) ist ein VBA-Unterprogram (MS-Word-Makro), das '''leere Paragrafen''' im aktiven Dokument '''löscht'''.
Su…“