CHIP-Makro für chemische Formeln richtig nutzen

In der Ausgabe 6/2000 hat CHIP in Tipp 20 ein Word-Makro vorgestellt, mit dem sich chemische Formeln formatieren lassen, indem es alle Ziffern im letzten Wort vor der aktuellen Cursorposition tiefer stellt.

Einige Leser berichteten uns, dass sie nach Übernahme des Makros von der Heft-CD die Fehlermeldung »Fehler beim Kompilieren: Mehrdeutiger Name: Chemische Formel« erhalten haben. Die Ursache: Wenn Sie den Visual-Basic-Editor aus Word mit »Extras | Makro | Makros« aufrufen, ist der Funktionsrumpf bereits vorhanden. Auf der Heft-CD und im Listing-Kasten ist das Makro vollständig enthalten – also mit dem kompletten Funktionsrumpf. Um das Makro in den vorbereiteten Abschnitt des VB-Editors zu übernehmen, lassen Sie die erste und letzte Zeile weg. Während überzählige »End-Sub«-Anweisungen einfach unterdrückt werden, führt eine mehrfache Funktionsdeklaration mit der Anweisung »Sub« oder »Public Sub« zur genannten Fehlermeldung.

Andere Leser berichteten von der Fehlermeldung »End If ohne If Block«. In den aktuellen Versionen von Visual Basic ist die Anweisung »End If« nur dann nötig, wenn die »If«-Anweisung, etwa wegen besserer Übersichtlichkeit, aus mehreren durch Absatzmarken getrennten Zeilen besteht. Meistens wird dabei die »Then«-Anweisung in eine eigene Zeile geschrieben. Im abgedruckten Makro in Tipp 20 der Ausgabe 6/2000 ist das der Fall. Bei der Übernahme auf die Heft-CD haben wir das Makro optimiert, allerdings die Anweisung »End If« nicht entfernt. Sie müssen also entweder vor der »Then«-Anweisung eine Absatzmarke einfügen oder die Anweisung »End If« löschen.