Ausgabe Optionsgruppe in Bericht
wilo
Gesendet: 25.11.13 14:00
Betreff: RE: Ausgabe Optionsgruppe in Bericht


Regular

Beiträge: 86
252525
Ort: Saarland
Hallo,

die verschachtelte Wenn Funktion ist irgendwie schlecht lesbar bzw wartbar.
Ich sehe 2 einfache Möglichkeiten:

1. =Choose(Deutsch;"PgF";"PeF";"eA","")
oder

2. Du schreibst eine kleine VBA Funtion
public Function getDeuschKuerzel(byval p_wert)
select case p_wert
case 1: getDeuschKuerzel="PgF"
case 2: getDeuschKuerzel="PeF"
...
end select
end function

die Funktion kannst Du dann ein Formularen oder Berichten verwenden

ich hoffe es hilft Dir weiter

Wilo

Top of the page Bottom of the page