Begrüßungsformel

Hallo Leute,

Ich habe in einem Access-Bericht einen Brief initiiert. Die Anschrift habe ich durch die folgende Formel erreicht.
„=Wenn(Glätten(“" & [Anrede])="";"";[Anrede] & " „) & Zchn(13)+Zchn(10) & Wenn(Glätten(“" & [Vorname] & " „)=“";"";[Vorname] & " „) & Wenn(Glätten(“" & [Nachname])="";"";[Nachname]) & Zchn(13)+Zchn(10) & (Wenn(Glätten("" & [Straße])="";"";[Straße])) & (Wenn(Glätten("" & [Hausnummer])="";"";[Hausnummer]) & Zchn(13)+Zchn(10)) & Wenn(Glätten("" & [Postleitzahl])="";"";[Postleitzahl] & " " & Wenn(Glätten("" & [Ort])="";"";[Ort]))"

Mir fehlt jetzt die Formel für die persönliche Anrede:

Sehr geehrte® Herr / Frau …

Und genau hier liegt das Problem ! Die Formel muß Herr und Frau unterscheiden, um dann entsprsprechend geehrte oder geehrter schreiben soll.

Das folgende klappt leider nicht; Meldung:…Funktion enthält falsche Anzahl an Argumenten.

=Wenn(([Anrede]=„Herr“;„Sehr geehrter Herr“ & " " & [Nachname]) & Wenn([Anrede]=„Frau“;„Sehr geehrte Frau“ & " " &[Nachname]))

Kann jemand helfen ?

Gruß Christian

Hallo Leute,

Ich habe in einem Access-Bericht einen Brief initiiert. Die
Anschrift habe ich durch die folgende Formel erreicht.
„=Wenn(Glätten(“" & [Anrede])="";"";[Anrede] & " „) &
Zchn(13)+Zchn(10) & Wenn(Glätten(“" & [Vorname] & "
„)=“";"";[Vorname] & " „) & Wenn(Glätten(“" &
[Nachname])="";"";[Nachname]) & Zchn(13)+Zchn(10) &
(Wenn(Glätten("" & [Straße])="";"";[Straße])) &
(Wenn(Glätten("" & [Hausnummer])="";"";[Hausnummer]) &
Zchn(13)+Zchn(10)) & Wenn(Glätten("" &
[Postleitzahl])="";"";[Postleitzahl] & " " & Wenn(Glätten("" &
[Ort])="";"";[Ort]))"

Solche Monster-Wenn-Bedingungen würde ich in transparenten Code mit Select Case-Konstruktionen umwandeln…

Mir fehlt jetzt die Formel für die persönliche Anrede:

Sehr geehrte® Herr / Frau …

Und genau hier liegt das Problem ! Die Formel muß Herr und
Frau unterscheiden, um dann entsprsprechend geehrte oder
geehrter schreiben soll.

Das folgende klappt leider nicht; Meldung:…Funktion enthält
falsche Anzahl an Argumenten.

=Wenn(([Anrede]=„Herr“;„Sehr geehrter Herr“ & " " &
[Nachname]) & Wenn([Anrede]=„Frau“;„Sehr geehrte Frau“ & " "
&[Nachname]))

ja, das würde ich auch anmeckern… :wink:

Kann jemand helfen ?

klar doch:

=Wenn([Anrede]=„Herr“;"Sehr geehrter Herr " &
[Nachname]; Wenn([Anrede]=„Frau“;"Sehr geehrte Frau " & [Nachname]; „Meine sehr verehrten Damen und Herren“))

Viele Grüße vom Bodensee
Franz, DF6GL

Franz Du bist ein Fuchs !!

schöne Weihnacht !

Gruß Christian