OpenOffice.info

Hallo Stephan,

super, das wars!
Beim Auslösen = Doppelklick, diese Info hat mir gefehlt.

Danke,
Steffan

Dim oDialog1 AS Object 
Dim oForm As Object

Sub StartDialog1 
oForm = DialogLibraries.Standard.Martin 
oDialog1 = CreateUnoDialog( oForm )
oDialog1.execute
end sub 

Sub d_klick
inhalt = oDialog1.GetControl("ListBox1")
Select Case inhalt.selectedItem
	Case "Eintrag1"
		erster
	Case "Eintrag2"
		zweiter
	Case "Eintrag3"
		dritter
End Select
End Sub

Sub erster
Msgbox "Erster"
End Sub

Sub zweiter
Msgbox "Zweiter"
End sub

Sub dritter
Msgbox "Dritter"
End Sub

[quote]wie kann ich einer Listbox in einem Dialog ein Makro beim Doppelklick auf einen Eintrag zuordnen?
Geht das überhaupt? [/quote]

Wenn ich Deine Frage richtig verstehe ja, z.B.:

[code]Dim oDialog1 AS Object
Dim oForm As Object

Sub StartDialog1
oForm = DialogLibraries.Standard.Martin
oDialog1 = CreateUnoDialog( oForm )
oDialog1.execute
end sub

Sub d_klick
inhalt = oDialog1.GetControl("ListBox1")
Select Case inhalt.selectedItem
Case "Eintrag1"
erster
Case "Eintrag2"
zweiter
Case "Eintrag3"
dritter
End Select
End Sub

Sub erster
Msgbox "Erster"
End Sub

Sub zweiter
Msgbox "Zweiter"
End sub

Sub dritter
Msgbox "Dritter"
End Sub[/code]

Du mußt das Makro d_klick dem Ereignis "beim Auslösen" der Listbox zuweisen und diese muß zumindest die drei Texteinträge haben die in der Select-Case-Schleife abgefragt werden.



Gruß
Stephan

Hab ich befürchtet.

Trotzdem danke für deine schnelle Antwort

Steffan.

Nein es geht nicht.

mfg
Michael

Hallo zusammen,

wie kann ich einer Listbox in einem Dialog ein Makro beim Doppelklick auf einen Eintrag zuordnen?
Geht das überhaupt?

Fragt sich
Steffan