Office: Prüfen ob Formel in Zelle

Hallo Fachmänner und Fachfrauen,
kann ich in einem Breich (F25 bis F46 ) Prüfen ob dort eine Formel oder ein Wert enhalten ist. Ich muss wenn nur die Formel in der Zellen enhalten ist die Formel aus der Zelle löschen. Wenn ein Wert in der Zelle ist der durch eine SVERWEISS entsteht soll der Wert in die Formel geschreiben werden und die Formel verschwinden. Es ist aber wichtig das die Formel die keinen Wert anzeigt gelöscht wird und die Zelle wieder Frei wird um durch doppelclick in einem anderen Blatt ein Wert in die Zelle geschreiben wird. Das habe ich schon fertig aber solange die Zelle die Formel enthält wird der Wert nicht übertragen.

Ich danke für jede Hilfe.
Gruß Eric

:)

 

Hallo, Eric,

dazu gibt es z.B. die HasFormula-Eigenschaft in Excel für Formeln. Und damit kann man dann auf den Wert der Zelle zugreifen. Aufgrund Deiner Beschreibung verstehe ich aber immer weniger, je häufiger ich den Text lese.

Gruß
LS

 

Hallo Eric,

Sverweis ist auch eine Formel.

Cells(1,3).HasFormula
Bei True ist eine Formel in der Zelle.
Für Deinen Fall mußt Du auch noch die Formel auswerten.




Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.

 

Hallo Lunpensammler und Hajo,
ich habe es bestimmt nicht gut beschrieben. Ist aber auch manchmal schwer etwas zu beschreiben. In den Zellen F25 bis F46 steht ein Sverweiss. Wenn alle Daten übertragen sind gehe ich nun hin und markiere den Bereich, kopiere und gehe dann über Bearbeiten und sage Werte einfügen. ( Makro habe ich aufgeziechnet) Dann stehen anstelle der Formeln, der Wert in den Zellen. Nun sind nicht alle Zellen mit Werten gefüllt sondern es sollen dann andere Werte in die Zelle geschrieben werden. Das geschiet aus einem anderen Blatt herraus in der selben Arbeitsmappe. Die Werte fülle ich per doppelclick in die noch freien Zellen. ( Ist ein anderes Makro ) Das geht aber nur wenn ich die freien Zellen erst nochmals markeire und dann Entfernen drücke. Erst dann kann ich per doppelcklick die Werte aus dem anderen Blatt anfügen.
Ich muss nun also die Zellen in dem Bereich F25 bis F46 markieren wo kein Wert steht und nochmals mit Entfernen "löschen", dann kann ich die Werte anfügen per doppelclick. Ist bestimmt nicht einfach zu verstehen aber dennoch hoffe ich auf Ratschläge. Mit HasFormuar kann ich leider so garnichts anfangen.

Danke für Euer verständniss meiner Unbeholfenheit.
Gruß Eric

 

Moin, eric,

eine Mappe könnte den Tatbestand sicherlich verdeutlichen, aber es kann durchaus sein, dass Du etwas in der Art von
Code:

suchst (hier könnte dann ClearContents stehen, obwohl mir nicht klar ist, wie leere Zellen nicht leer sein sollen, es sei denn, sie verfügen noch über das ' für Text).

 

Hallo Jinx,
danke für die Hilfe. Die Zellen waren tatsächlich nicht leer. Vorher war die Formel: =WENN(Prüfcode_Übergabe!A2="";"";Prüfcode_Übergabe!A2) in den Zellen. Diese Formel war in den Zellen F24 bis F46 enthalten, natürlich dann aber mit ....A3 = "";"";... usw. Dann habe ich den Breich F24 bis F46 kopiert und dann über Berabeiten/Inhalte Einfügen die Werte eingefügt damit die Formel verschwindet. Die Zellen die, die Formel mit "" darstellen sollten waren danach aber immer noch nicht leer, wenn auch nichts mehr angezeigt wurde.
Ich habe es in meiner Not dann anders gelöst.
=WENN(Prüfcode_Übergabe!A2="";9999999;Prüfcode_Übergabe!A2). Dann über Berbeiten/Ersetzen habe ich alle Zellen mit 9999999 mit "leer" ersetzt, also nichts in die Zeile -Ersetzen durch- geschrieben. Danach waren die Zellen erst leer und ich konnte das Makro von Dir wo ich die Zellen Doppelclicke und der Wert übernommen wird gebrauchen und die Werte wurden dann in die nächste Leere Zelle übernommen.
Wie gut das man Makros aufzeichnen kann.

Danke für die Mühe!

Gruß Eric