Einige Leute lieben Lesezeichen. Sie sind praktisch, aber wenn jemand anderes Lesezeichen in einem Dokument setzt, benötigen Sie diese möglicherweise nicht, sobald Sie das Dokument von ihm erhalten haben. Wenn viele, viele Lesezeichen gesetzt sind (denken Sie daran, wir sprechen über Leute, die Lesezeichen wirklich lieben), kann es ziemlich mühsam sein, sie alle einzeln zu entfernen.

Wenn Sie sich in dieser Situation befinden, sollten Sie das folgende Makro griffbereit halten. Es untersucht das aktive Dokument (das, das Sie gerade betrachten) und entfernt alle darin enthaltenen Lesezeichen.

Sub RemoveAllBookmarks()

Dim b As Bookmark

For Each b In ActiveDocument.Bookmarks         b.Delete     Next b End Sub

Sie sollten beachten, dass dadurch einfach das Lesezeichen gelöscht wird und kein Text, auf den das Lesezeichen verweist. Beachten Sie außerdem, dass alle Lesezeichen im Dokument gelöscht werden, einschließlich aller Lesezeichen, die möglicherweise von Word selbst erstellt wurden.

(Word erstellt seine eigenen versteckten Lesezeichen für verschiedene Zwecke, z. B. Links in einem Inhaltsverzeichnis.) Wenn Sie das Löschen von Lesezeichen überspringen möchten, die Word möglicherweise erstellt hat, können Sie das Makro nur ein wenig ändern:

Sub RemoveUserBookmarks()

Dim b As Bookmark

For Each b In ActiveDocument.Bookmarks         If Left(b.Name,1) <> "_" Then b.Delete     Next b End Sub

_Hinweis: _

Wenn Sie wissen möchten, wie die auf dieser Seite (oder auf einer anderen Seite der WordTips-Websites) beschriebenen Makros verwendet werden, habe ich eine spezielle Seite vorbereitet, die hilfreiche Informationen enthält.

WordTips ist Ihre Quelle für kostengünstige Microsoft Word-Schulungen.

(Microsoft Word ist die weltweit beliebteste Textverarbeitungssoftware.) Dieser Tipp (9004) gilt für Microsoft Word 2007, 2010, 2013, 2016, 2019 und Word in Office 365. Eine Version dieses Tipps finden Sie für ältere Menüoberfläche von Word hier: