Seite 1 von 1

Anfänger Frage

Verfasst: So, 10.09.2006 12:31
von lazi
Hallo Leute!
Möchte von Excel umsteigen. Und komme mit den Dialog-Interpreter nicht klar.
Habe folgendes geschrieben....
Unter Windows laeuft es nur im "Einzelschritt" unter Suse laeuft es garnicht...was ist falsch..?

Sub Main

dim dlg , dlgBeschreibung as object
dlgBeschreibung = DialogLibraries.Standard.Dialog1

dlg = createunodialog(dlgBeschreibung)

dlg.execute ()


Mit besten Dank im voraus

Jürgen

Verfasst: So, 10.09.2006 14:36
von Stephan
was ist falsch..?
für linux würde ich die Variable dlg ebenfalls als Objektvariable deklarieren (ist eigentlich nicht zwingend aber aus Erfahrug weiß ich das Linux oftmals sensibel auf fehlende Deklariationen/Initialisierungen von Variablen in StarBasic reagiert)

Sonst sehe ich keinen Fehler. Bist Du denn sicher das Du nicht etwa das Makro im Einzelschrittmodus startest?


Gruß
Stephan

Verfasst: So, 10.09.2006 14:40
von ykcim
gelöscht

Re: Anfänger Frage

Verfasst: So, 10.09.2006 14:50
von lazi
Hallo!

Also wenn ich über "Run Macros" starte dann kommt in der Zeile...
dlg = createunodialog(dlgBeschreibung) der Fehler
Action not supported. Invalid procedure call.

Da ich ja danach sowieso im Basic bin und ich klicke mich dann mit F8 durch dann kommt dieser Fehler nicht sondern der Dialog.

Es ist hierfür auch egal ob ich dlg als obect definiere oder nicht.

Gruß Jürgen

Verfasst: So, 10.09.2006 15:20
von Stephan
Also wenn ich über "Run Macros" starte dann kommt in der Zeile...
dlg = createunodialog(dlgBeschreibung) der Fehler
Action not supported. Invalid procedure call.
??
Kann sein, nur davon stand nichts in Deinem Ausgangspost, dort stand was von Einzelschritt und Makro läuft garnicht (und garnicht ist nicht Makro läuft und stoppt mit Fehlermeldung)

Vielleicht ist das Makro in der OOo-Bibliothek Standard, darauf deutet für mich das Verhalten hin was Du beschreibst. Lade also diese Bibliothek zunächst:

'

Code: Alles auswählen

...
BasicLibraries.LoadLibrary("Standard")
dim dlg , dlgBeschreibung as object 
dlgBeschreibung = DialogLibraries.Standard.Dialog1 

dlg = createunodialog(dlgBeschreibung) 
'...

hoffe das hilft.



Gruß
Stephan

Re: Anfänger frage

Verfasst: So, 10.09.2006 15:26
von lazi
Super. DANKE!!!

Jetzt geht es.

Gruß Jürgen