Gelöst: Wert aus Listenfeld übernehmen - Fehlermeldung

[hema]

Hallo,
habe mir mit Hilfe des Buches Makros in OOo ein Suchformular für Personen zusammengebaut, bzw. das Formular aus der Heimtierbedarf-Datenbank angepasst.
Nun versuche ich die Aktionen zu automatisieren, wieder genau nach Buch.
Bin mittlerweilen bei folgendem Makro, welches automatisch den Datensatz speichern und die gewählte Person anzeigen soll

Code: Alles auswählen

Sub speichern_und_neuladen
	oForm = ThisComponent.drawpage.forms.getByName("Standard")
	oCtr =oForm.getByName("ListBox")                 'Listboxname
	oForm.updateInt(2, oCtr.selectedItems(0))
	oForm.upDateRow () 	                                'speichern
	oForm.reload()		                                    'aktualisieren

End Sub

Den Fehler in der zweiten Zeile (...drawpage... fehlt im Buch) habe ich mittlerweilen mit Hilfe des Forums lösen können.
Habe dieses Marko wie beschrieben der Listbox zugeordnet.
Wenn ich nun eine Person wähle, erscheint ein Basic-Laufzeitfehler "Eigenschaft oder Methode nicht gefunden".
im Makro Bearbeitungsfenster wird die 4. Zeile "oForm.updateInt(2, oCtr.selectedItems(0))" markiert.
Vermute daher als Anfänger, dass dort der Fehler liegt. Aber wooooo
Meine einzige Änderung zur Original-DB von Th.K. ist, dass in meiner Listbox zwei Felder zusammengefasst angezeigt werden.

Code: Alles auswählen

SELECT "Familienname" + SPACE( 1 ) + "Vorname" AS "Person", "ID_Personalien" FROM "tblPersonalien" ORDER BY "Person" ASC

Dies, weil relativ viele Personen denselben Familiennamen haben.
Habe auch ohne Zusammenfassung der Namen probiert, nützt auch nichts.

Nun sitze ich hier und weiss nicht mehr weiter.
Gruss und schon mal im Voraus Danke

Markus

[hema]

Habe den Fehler gefunden.
Mit Hilfe des Formular-Navigators habe ich gesehen, dass ich ein zweites gleichlautendes Listenfeld hatte.
Dieses beiden ListBoxen lagen genau übereinander und hatten auch denselben Namen.
Habe nun eine davon gelöscht und nun funktioniert auch die Datenübergabe.

Nichts für ungut


Nur noch eine kleine Frage:
Gibt es in diesem Forum eine Funktion, mit welcher man sein Problem/Thema als gelöst markieren kann?

[komma4]

Gibt es in diesem Forum eine Funktion, mit welcher man sein Problem/Thema als gelöst markieren kann?

Nein.

Ediitere den Titel des ersten Postings, wenn Dir danach ist.
Wenn Dein Code läuft können andere Suchende davon profitieren; Danke!