Macro für Formel in Zelle bei Excel2003 oder?

[Excalibur33]

Diesmal selber kleines Problem.
Spalte A: Wird Artikelnr. eingetragen dann
Spalte B: Formel soll erhalten bleiben(=Sverweis)
Wenn Spalte A: =leer dann
Spalte B: soll Text möglich sein
klar, wenn ich in Spalte B Text eintrage, kille ich die Formel raus
ich habe also in Spalte B die Sverweis-Formel drin, wobei ich bei Bedarf einen Text eintragen möchte. Geht dies nur mit Macro,oder kann ichs mit der:>
=Wenn A=>0 dann B= (Formel)ansonsten "Text blabla"
Wobei der Text frei gestaltbar sein sollte!
mfg Excal

[flinx]

Wenn-Bedingung sollte funktionierern, musst halt den einzutragenden Text in die Wenn-Bedingung schreiben.

[jak]

=WENN(A1;FORMEL;TEXT)
z.B.
=WENN(A1;A1+1;"Diese Zelle ist Leer")

Damit der Text beliebig ist musst du ihn nur ändern. Wenn du bei allen Zellen den selben Text haben willst, ist es am besten du schreibst ihn z.B. in C1 und machst dann:
=WENN(A1;FORMEL;$C$1)

Jak

[Excalibur33]

@flinx
Ist schon klar, damit habe ich allerdings nur einen! Standard-text. Brauche aber freie Editierbarkeit.
Wie schaut es mit Macro aus,
Autoausfüllen
Sub
if RANGE (A23:A45)= Eingabe: Div; RANGE(B23:B45) = Zellenformat Text
other input= Formel(Sverweis)
Sub End
Will mit dem Macro das Zellenformat auswählen; also entweder Text-eingabe in Spalte B: wenn Spalte A=Eingabe: Div, oder die Formel bleibt drin
mit dem Macrorecorder ist das nicht so leicht hinzukriegen, beim Schreiben leichter, da Debugger die Fehler anzeigt.
@jak
Du meinst, die Formel in eine weitere Spalte(C), in B:B die erste WENN- Bedingung: WENN(A23:A45=Div;"Text";C23:c45!), und den Sverweis in C:C ?
mfg Excal

[jak]

Du kannst es ja so machen, das du in A die Daten, in B die Formel und in C den Alternativtext hast, dann geht's mit
=WENN(A1;FORMEL;WENN(C1<>"";C1;$D$1))
Wenn du diese Formel "runterzeihst" (kenn den korrekten Ausdruck nicht), nimmt er immer den Wert aus Spalte C und wenn Cx leer ist einen Standardwert, den du in D1 einträgst.

Jak

[Excalibur33]

Ist das gleiche,wie wenn ich den erforderlichen Text als Artikel mit Bezeichnung "Text", bzw. "Text2" anlege, und die Formel in B:B lasse. Damit hätte ich verschiedene Texte zur Verfügung. Müsste allerdings jeweils immer den Text als Artikel anlegen, somit wird das Blatt immer grösser. Ist nicht der Sinn der Sache. Soll bei Rechnung als freier Text fungieren.
Macro wär die elegantere Lösung
mfg Excal

[jak]

Müsste allerdings jeweils immer den Text als Artikel anlegen, somit wird das Blatt immer grösser

Was meinst du damit?
Wieso wird die Tabelle immer größer?

Bei meiner Lösung gibst du einen Standardtext ein, und überall wo ein anderer Text stehen soll gibst du den anderen text ein. Wie soll es einfacher/mit weniger Zellen gehen?

Jak

[Excalibur33]

Wieso wird die Tabelle immer größer?

Ganz einfach, da pro Rechnung durchschnittl. 3 Zeilen mit versch. Text vorhanden sind. Die Rechnung wird per Macro ins Blatt "Archiv" gespeichert. Wenn ich den Text nicht als Artikel anlege, kann ich ihn so nicht speichern. Wenn ich in der Rechnung die Spalte "B" mit Text überschreib, ist die Formel weg. Die nächste Rechnung hat andere Texte, ergo wird die Tab. immer grösser nur dadurch, oder ich muss immer wieder die Formel neu reinkopieren.
mfg Excal

[flinx]

Ich versteh dein Problem leider immer noch nicht.
Ad Freie Editierbarkeit:
Du kannst den Text im Wenn doch Editieren. Ist doch egal welcher drinnen steht, wennst einen anderen brauchst, schreibst ihn halt hinein (ins Wenn).

Alternativ:
Schreib deinen Text einfach in die B Zelle und lass die Formel per Makro in die fehlenden B Zeilen schreiben.

[Excalibur33]

Das Stimmt! Ich könnte Editieren, aber , mein Kollege soll damit arbeiten, wenn er allerdings nicht auf die Formelzeile oben springt, ist die Formel futsch.
ad 2: es sind nicht immer die gleichen Zeilen, die Text benötigen.
ad 3: Wird die Artikelnr. und Menge gespeichert, dadurch kann ich die archivierte Rechnung nochmal anschauen bzw ausdrucken. Wenn ich in der WENN-Formel den Text editier, erscheint dann immer der letzt-eingetragene Text!
Ist doch nicht soo einfach wie ich dachte.
mfg Excal