OpenOffice.info

[quote]Ich möchte aber eigentlich mit der Variablen "Ergebnis" eine if Schleife machen, die ggfs ein Makro auslöst.[/quote]

Eine solche Variable kommt im Code nicht vor so das man nicht darauf antworten kann da überhaupt nicht bekannt ist was sich hinter diesder Variablen verbirgt.

[quote]Zumindest ignoriert das Programm die if Zeile völlig.[/quote]

Bei mir läuft das Makro völlig normal (also ist der Eintrag " Text" so wird beim Ablauf des Makros Main auch das Makro Antwort aufgerufen) und ich habe keine Ahnung was gemeint sein könnte.



Gruß
Stephan

Sub Main
dim Eintrag as string
oForm= ThisComponent.drawpage.forms.getbyindex (0)
oListbox = oForm.getByName ("Listenfeld 1")
Eintrag = oListbox.getCurrentValue
 MsGbox " Daten gleich" + Eintrag 
if Eintrag = " Text" then Antwort
End Sub


Sub Antwort
MsGBox "Richtig"
End Sub

Vielleicht kann jemand weiterhelfen?
Ich hab einen schönen Codeschnipsel gefunden, der ein angewähltes Listenfeld in einem writerdokument in eine MsGBox ausgibt.
Ich möchte aber eigentlich mit der Variablen "Ergebnis" eine if Schleife machen, die ggfs ein Makro auslöst.
also.-- if Eingabe = " Text" then -- Makro aufrufen
Leider scheint diese Idee nicht richtig zu sein. Zumindest ignoriert das Programm die if Zeile völlig.
Der Code lautet bislang folgendermaßen:

Windows Xp ooo 3.2.

[code]Sub Main
dim Eintrag as string
oForm= ThisComponent.drawpage.forms.getbyindex (0)
oListbox = oForm.getByName ("Listenfeld 1")
Eintrag = oListbox.getCurrentValue
MsGbox " Daten gleich" + Eintrag
if Eintrag = " Text" then Antwort
End Sub


Sub Antwort
MsGBox "Richtig"
End Sub[/code]



[color=#800000]Moderation,4[/color]: CODE tags gesetzt