OpenOffice.info

Guten Morgen,

ich habe einen Datenbank, die mit Makros und Buttons bestückt ist. Das unten
aufgeführte Makro hat bisher immer funktioniert und die entsprechende Seite
wurde geöffnet. Seit ein paar Wochen springt es nicht mehr auf die Seite sondern



SUB Zu_Formular_von_Formular(oEvent AS OBJECT)

DIM stTag AS String
stTag = oEvent.Source.Model.Tag
aForm() = Split(stTag, ",")

IF Ubound(aForm()) > 0 THEN
ThisDatabaseDocument.FormDocuments.getByName( Trim(aForm(1)) ).open
END IF
ThisDatabaseDocument.FormDocuments.getByName( Trim(aForm(0)) ).close

END SUB

Seit ein paar Wochen springt es nicht mehr auf die Seite sondern

da fehlt wohl etwas Text?

Davon abgesehen: das Makro lässt keine Fehler erkennen, Du wirst also selbst überprüfen müssen ob:
-das Makro wirklich startet
-ob aForm() denrichtigen Inhalt hat


Gruß
Stephan