Excel/Calc: Wenn in Zelle A "TTT", dann in B "JA". Wenn in A "FFF", dann in B "NEIN"

[Tribo0n]

Wenn in Zelle A2 das Wort "Lieber" oder "Liebe" vorkommt soll in B2 Du geschrieben werden, wenn in Zelle A2 "Sehr geehrter" oder "Sehr geehrte" vorkommt, dann soll in B2 Sie geschrieben werden.
Verzweifle da irgendwie das automatisch mit einer Formel hinzubekommen. Somit habe ich das erstmal per Hand eingetragen, es werden aber noch ein paar hundert Einträge... Von Daher wäre automatisch schon schöner

Weiß jemand Rat?
Vielen Dank

 

[Mr. Snoot]

In B2:

=WENN(ODER("Liebe "=LINKS(A2;6);"Lieber "=LINKS(A2;7));"Du";WENN(ODER("Sehr geehrte "=LINKS(A2;13);"Sehr geehrter "=LINKS(A2;14));"Sie";""))​

bzw. könnte man es theoretisch auch etwas kürzen:

=WENN("Liebe"=LINKS(A2;5);"Du";WENN("Sehr geehrte"=LINKS(A2;12);"Sie";""))​

 

[Tribo0n]

So bleibt die Zelle leider leer... :/

 

[Mr. Snoot]

Ja, hab's oben korrigiert.

Ggf. musst du noch was einbauen, wenn etwas anderes als Du oder Sie in der Zelle steht.

 

[Tribo0n]

Wird nicht vorkommen, bzw, dann einfach leer lassen.
Vielen Dank es geht!!!

 

[Mr. Snoot]

Du benutzt aber schon relative Zellbezüge?

​

edit: Okay

 

[Tribo0n]

P.S. weißt du/weiß jemand wie ich z.B. ein § druch ein Zeilenumbruch in der Zelle ersetze?
P.S. Suchen & Ersetzen + Strg+j klappt nicht

 

[Mr. Snoot]

Wenns mit dem Suchen & Ersetzen-Dialog nicht geht muss wohl ein kleines Makro her:

Sub ersetzen()

  Cells.Replace what:="§", replacement:=Chr(10)

End Sub

Den Makro-Editor mit Alt+F11 aufrufen, über Einfügen ein Modul in der aktuellen Arbeitsmappe einfügen, Doppelklick auf das Modul, Code im rechten Fenster einfügen und mit F5 ausführen.

 

[Tribo0n]

Ich nutze OpenOffice 3.3. Wenn ich das Makro ausführe kommt folgender Fehler: BASIC-Laufzeitfehler. Objektvariable nicht belegt.

 

[Mr. Snoot]

Gibt's in OpenOffice einen Makrorekorder?

Falls ja, nimm einfach einen Suchen & Ersetzen-Vorgang auf und mache irgendwo händisch einen Zeilenumbruch in einer Zelle. Dann siehst du am Makroeditor den entsprechenden Code für a) Suchen & Ersetzen und b) den Ersetzungsausdruck für den Zeilenumbruch und kannst dir das dann zusammenbasteln. Ich denke, dass sich das nicht großartig vom Excel-Code unterscheidet.

 

[Tribo0n]

Habs mit Ultra Edit hinbekommen. Dank dir vielmals!