Clever-Excel-Forum

Salut zusammen

In meinem Betrieb wurde eine neue Datenbanksoftware eingefügt. Via excel-File lassen sich dort schnell Daten einfügen. Ich habe dazu excel-Vorlagen (die verschiedenen Anforderungen gerecht werden und einen möglichst benutzerfreundlichen Übergang ermöglichen und z.B. auch als Print-Vorlage dienen sollen) erstellt. Das Ziel ist, dass die User möglichst einfach die Daten importieren können. Die excel Vorlagen beinhalten einfache Formeln. Das Problem beim Import ist nun, dass wenn eine mit einer Formel hinterlegte Zelle oder Spalte keinen Wert hat, in der Datenbank im entsprechenden Eingabefeld der Wert "0" erscheint. Ziel wäre es, dass in der Datenbank das entsprechende Feld auch keinen Wert enthält. Ich habe mich daher gefragt, was wohl der einfachste Weg ist, dieses Problem zu lösen? Die Daten ohne Formeln in eine neue Tabelle kopieren?

Gibt es vielleicht eine Masterformel, die Formeln in Zellen löscht, die keine Werte enthalten? ;)

Ich wäre für Eure Hilfe seeehr dankbar. Ich bin alles andere, als ein excel-Experte...

Liebe Grüsse Simon

Du hast es auch nicht mit der deutschen Sprache.

"Formel um Formeln in Zellen ohne Wert löschen?"

Wer soll das verstehen? Man muss schon Deinen Text heranziehen, um am Ende folgendes anzunehmen:

[Gibt es eine] Formel [KOMMA] die Formeln in Zellen ohne beinhaltenden Wert löscht?

Nun zum Inhaltlichen: Die Behandlung von 0 ist gefährlich, denn dafür müsste ausgeschlossen werden können, dass es auch korrekt berechnet 0 sein darf. Wenn ich beim Fußball z.B. Gegentore von Toren abziehe, ergibt das beim Unentschieden genauso 0, als wäre überhaupt nicht gespielt worden. Gerade dieser Unterschied "gespielt oder nicht" ist aber essenziell.

Formel um Formeln in Zellen ohne Wert löschen?

Hallo.
Es ist ein kleines Ratespiel, aber hier ein Versuch.
In meiner Beispieldatei habe ich die Zellen A8:M8 + A18:M18 + A28:M28 mit einer simplen Formel versehen:
Beispiel Zelle A8

Code:
=WENN(A1<>"";SUMME(A1:A7);"")

Folgendes Makro prüft nun das Tabellenblatt "Tabelle1", ob eine Formel hinterlegt ist und der Zellwert Leer bzw. "" ist.

Code:
Sub Formel_ohne_Wert_löschen()

    Dim ws As Worksheet

    Dim rng As Range

    Dim cell As Range

    ' Tabellenblatt festlegen

    Set ws = ThisWorkbook.Sheets("Tabelle1")

    ' Prüfbereich

    Set rng = ws.UsedRange

    ' Schleife über jede Zelle im Bereich

    For Each cell In rng

        ' Überprüfen, ob die Zelle eine Formel enthält und der Wert leer ist

        If cell.HasFormula And cell.Value = "" Then

            ' Inhalt der Zelle löschen

            cell.ClearContents

        End If

    Next cell

End Sub

Vielen herzlichen Dank für die Antwort! Der Tipp mit dem Makro hilft mir sehr weiter. Merci und lieber Gruss

Vielen Dank für die Antwort LCohen. Interessanter Gedanke. folgendes (!): Ich habe schon Schlimmeres gesehen in Deiner deutschen Sprache; Du sicher auch? ;) Verstanden wurde es jedenfalls, Lieber Gruss

simon84

LCohen

el-rettev

simon84

simon84