Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Wenn Zelle nicht leer dann setze 1

Forumthread: Wenn Zelle nicht leer dann setze 1

Wenn Zelle nicht leer dann setze 1
23.11.2005 14:59:50
Alexander
Hallo Zusammen,
ich hab eine totla simple Frage aber leider komm ich grad nicht selber drauf:
Und zwar: Wie mach ich es, dass Wenn in einer Zelle etwas enthalten ist, dann ersetze diesen Inhalt durch 1 und wenn nichts enthalten ist trag eine 0 ein!
Dank euch schonmal im Voraus!
Gruß Alex
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wenn Zelle nicht leer dann setze 1
23.11.2005 15:05:03
ede
hallo alex,
mit dieser formel:
wenn(istleer(a1);0;1)
danach die spalte kopieren und inhalte einfügen, nur werte!
gruss
AW: Wenn Zelle nicht leer dann setze 1
23.11.2005 15:05:33
Marco
Hi
Durch bedingte Formatierung
Formel ist: =Wenn (A!="";"0";"")
Gruss
Marco R
AW: Wenn Zelle nicht leer dann setze 1
23.11.2005 15:08:47
TheUniversal
Kein Problem.
=Wenn(deineZelle>0;"1";"0") - Zelle größer 0
=Wenn(deineZelle =Wenn(deineZelle=0;"1";"0") - Zelle gleich 0
Ich hoffe, ich konnte dir helfen.
Anzeige
AW: Wenn Zelle nicht leer dann setze 1
23.11.2005 15:09:47
Alexander
Hallo Ede,
das wenn(istleer(a1);0;1)klappt ganz wunderbar wenn ich eine zweite Spalte habe!
ALlerdings möchte ich den Wert der eigentlichen Zelle überschreiben! Also wenn in der Zelle was enthalten ist dann entfern dies und setze dafür eine 1 sonst eine Null!
Gruß
AW: Wenn Zelle nicht leer dann setze 1
23.11.2005 15:45:21
Mag

Sub Test()
Dim Zelle, Bereich As Range
Set Bereich = Selection
For Each Zelle In Bereich
If Zelle.Value = "" Then Zelle.Value = 0 Else Zelle.Value = 1
Next
End Sub

Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige
Anzeige

Infobox / Tutorial

Zelle ersetzen, wenn nicht leer


Schritt-für-Schritt-Anleitung

Um in Excel den Inhalt einer Zelle durch 1 zu ersetzen, wenn sie nicht leer ist, und durch 0, wenn sie leer ist, kannst du folgende Schritte befolgen:

  1. Wähle die Zelle oder den Bereich aus, in dem du die Werte ändern möchtest.
  2. Öffne die Eingabezeile und gebe die folgende Formel ein:
    =WENN(ISTLEER(A1); 0; 1)

    Hierbei steht A1 für die Zelle, die überprüft werden soll. Ersetze A1 mit der entsprechenden Zelle.

  3. Drücke Enter, um die Formel auszuführen.
  4. Um die Formel auf weitere Zellen anzuwenden, ziehe das kleine Quadrat in der unteren rechten Ecke der Zelle nach unten oder nach rechts.

Wenn du die Werte direkt in die Zelle schreiben möchtest, kannst du auch ein einfaches VBA-Skript verwenden.


Häufige Fehler und Lösungen

  • Fehler: Die Formel gibt immer 0 zurück.
    Lösung: Überprüfe, ob die Zelle wirklich leer ist. Manchmal kann ein Leerzeichen den Inhalt der Zelle beeinflussen.

  • Fehler: Die Formel wird nicht in der Zelle angezeigt.
    Lösung: Stelle sicher, dass die Zelle als "Allgemein" oder "Zahl" formatiert ist. Wenn sie als "Text" formatiert ist, wird die Formel nicht berechnet.

  • Fehler: VBA-Skript funktioniert nicht.
    Lösung: Stelle sicher, dass du die richtigen Berechtigungen hast, um Makros auszuführen. Überprüfe auch, ob der Code im richtigen Modul eingefügt wurde.


Alternative Methoden

Neben der Verwendung von Formeln gibt es auch alternative Methoden, um den Inhalt einer Zelle zu ersetzen, wenn sie nicht leer ist:

  1. Bedingte Formatierung: Du kannst die bedingte Formatierung verwenden, um Zellen hervorzuheben, die nicht leer sind, anstatt ihren Inhalt zu ändern.

  2. Makros in VBA: Hier ist ein einfaches VBA-Skript, das du verwenden kannst:

    Sub Test()
    Dim Zelle As Range
    Set Bereich = Selection
    For Each Zelle In Bereich
       If Zelle.Value = "" Then
           Zelle.Value = 0
       Else
           Zelle.Value = 1
       End If
    Next
    End Sub

    Dieser Code ersetzt den Inhalt der ausgewählten Zellen durch 1 oder 0.


Praktische Beispiele

  • Beispiel 1: Wenn du in Zelle A1 den Wert "Hallo" hast und die oben genannte Formel anwendest, wird der Wert in der Zelle, in der die Formel steht, zu 1.

  • Beispiel 2: Wenn du ein VBA-Skript verwendest und in Zelle B1 "Test" steht, wird nach der Ausführung des Skripts der Wert in B1 durch 1 ersetzt.


Tipps für Profis

  • Nutze Tastenkombinationen, um schneller durch deine Excel-Datei zu navigieren und Formeln einzugeben.
  • Verwende Tabellen: Wenn du mit großen Datenmengen arbeitest, konvertiere deine Bereiche in Excel-Tabellen. So wird die Bearbeitung einfacher und übersichtlicher.
  • Formeln dynamisch gestalten: Du kannst die Zellbezüge in deinen Formeln dynamisch gestalten, indem du die Funktion INDIREKT verwendest. So wird die Formel flexibler.

FAQ: Häufige Fragen

1. Wie kann ich den Inhalt einer Zelle nur anzeigen, wenn sie gefüllt ist?
Du kannst die Formel =WENN(NICHT(ISTLEER(A1)); A1; "") verwenden, um den Inhalt anzuzeigen, wenn die Zelle nicht leer ist.

2. Kann ich diese Methoden in allen Excel-Versionen verwenden?
Ja, die beschriebenen Formeln und VBA-Skripte funktionieren in den meisten modernen Excel-Versionen, einschließlich Excel 2013, 2016, 2019 und Office 365.

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige