| Rubrik: Word | VB-Versionen: VBA | 10.03.16 |
 Ermitteln und markieren von Wortwiederholungen im Word-Dokument (VBA, Word 2007)Der Tipp beinhaltet ein VBA-Projekt, mit dem es möglich ist, aus einem Text Wortwiederholungen zu zählen und kenntlich zu machen. | ||
Autor:  Dietrich Herrmann | Bewertung:  | Views: 13.875 |
| ohne Homepage | System: Win7, Win8, Win10, Win11 |  Beispielprojekt |
Zur Verbesserung von Texten ist manchmal nötig, dass man Wortwiederholungen einerseits ermitteln und andererseits im Text kenntlich machen kann, um dann eventuell den Text umzuformulieren. Da unterstützt das vorgestellte Projekt.
Das Projekt enthält eine Userform, mit der zweigeteilt folgende Aktionen durchgeführt werden können:
Voraussetzung für die Aktionen ist eine Menge markierten Textes in einem Word-Dokument.
- Wörter mit ihren Häufigkeiten anzeigen
Es kann eine Grenze der Worthäufigkeit eingegeben werden.
Mit Button 'ermitteln' wird die Aktion gestartet. Alle Wörter des markierten Textes werden extrahiert und gemäß ihres Auftretens gezählt. Dann werden die Wörter mit ihrer Häufigkeit in einer Liste in alphabetischer Reihenfolge angezeigt, wenn die Häufigkeit die gesetzte Grenze übersteigt.
- Wörter markieren
Bei diesem Teil der Aktionen kann zunächst entweder ein Wort manuell eingegeben oder aber mit Klick in die nebenstehende Liste ausgewählt werden. Das eingegebene Wort wird dann mittels Button 'markieren' im Auswahltext gesucht und mit der Markierungsfarbe (mittels Farbdialog einstellbar) an jeder Stelle seines Auftretens markiert. Für die Markierung gibt es zwei Einstellungen: 'Groß/Kleinschreibung beachten' und 'Nur ganze Wörter (Standard)'. Mittels Button'rückgängig' können alle Farbmarkierungen von Wörten wieder beseitigt werden. Die ursprüngliche Textauswahl bleibt erhalten.
Es werden für die Ausführung des Projekts folgende Funktionen benötigt:
VBA-Funktionen #1, bestimmte Funktionen zur Array-Verwendung
Das Modul showColorDialog (im Projekt enthalten)
Das Modul dhMultiUndo (im Projekt enthalten)
