Hallo Susanne,
ich habe das einmal für den Writer fertig gemacht - mit Makro.
Schicke ich Dir per privater Mail zu.
SUB List(oEvent AS OBJECT)
DIM a()
oField = oEvent.Source.Model
stTag = oField.Tag
stStart = oField.CurrentValue
oForm = oField.Parent
oFieldTarget = oForm.getByName(stTag)
IF stStart = "" THEN
oFieldTarget.Enabled = False
EXIT SUB
ELSE
oFieldTarget.Enabled = True
END IF
SELECT CASE stStart
CASE "Schleswig-Holstein"
a = array("Kiel", "Flensburg", "Eckernförde")
CASE "Niedersachsen"
a = array("Emden", "Oldenburg", "Hannover")
CASE "Nordrhein-Westfalen"
a = array("Düsseldorf", "Münster", "Rheine")
END SELECT
oFieldTarget.StringItemList = a
oFieldTarget.refresh
END SUB
In dem ersten Feld steht in den Zusatzinformationen der Name des 2.
Listenfeldes. Der Inhalt, den das erste Listenfeld anzeigt, muss mit den
CASE-Bedingungen übereinstimmen.
Gruß
Robert
--
Homepage: https://www.familiegrosskopf.de/robert
--
Liste abmelden mit E-Mail an: users+unsubscr...@de.libreoffice.org
Probleme?
https://de.libreoffice.org/hilfe-kontakt/mailing-listen/abmeldung-liste/
Tipps zu Listenmails: https://wiki.documentfoundation.org/Netiquette/de
Listenarchiv: https://listarchives.libreoffice.org/de/users/
Datenschutzerklärung: https://www.documentfoundation.org/privacy
