MindManager bietet mit dem Makro-Editor eine interessante Entwicklungsumgebung, um die Funktionalitäten zu erweitern. Damit lassen sich ausgefeilte Lösungen realisieren (z.B. spezielle Word-Exporte), aber auch kleine Helferlein, die einem in mancher Situation das Leben erleichtern bzw. Zeit sparen können. Ein solches Helferlein ist das folgende kleine Makro, das einfach alle Zweig-Hyperlinks aus einer Map entfernt.
Wofür braucht man das? In meinem Fall hatte ich mir eine umfangreiche Ordnerstruktur über den Dateiexplorer in eine Map importiert. Mir ging es aber nur um die Ordnernamen, die Links benötigte ich nicht mehr. Da es sich um ein paar hundert Zweige handelte, machten diese zudem die Map etwas träge.
Also, nichts wie ran und in fünf Minuten folgendes Makro gebastelt:
Dim WithEvents tf As TopicFinder Sub Main Dim t As Topic Set t = ActiveDocument.CentralTopic Set tf = t.NewTopicFinder tf.Start End Sub Private Sub tf_TopicFound (t As Topic) If t.HasHyperlink Then t.Hyperlink.Delete End If End Sub
