Supportnet Computer
Planet of Tech

Supportnet / Forum / Tabellenkalkulation

leere Zellen mit einer Null "0" füllen





Frage

Hallo Leute, ich hoffe ihr könnt mir noch einmal helfen. Ich möchte wenn es geht die leeren Zellen in G4:I500 und K4:N500 mit einer Null füllen wenn die Zelle leer ist. Mir würde es ganz recht sein wenn sowas über VBA gehen würde. Gruß Achim

Antwort 1 von Hajo_Zi

Hallo Achim,

das geht ohne Makro, kannst Du aber auch aufzeichnen.
Bereich markieren, Bearbeiten, Gehe zu, Inhalte, Leerzellen, im Bearbeitungsleioste 0, Strg+Enter.

Gruß Hajo

Antwort 2 von achim71

Hallo Hajo,

Danke für deine Hilfe, funktioniert auch so weit nur ergibt sich nun ein anderes Problem, wenn nun alle zellen ausgefüllt sind kommt eine Fehlermeldung, keine Zellen gefunden, mir ist klar das, das mit der folgen Zeile zu tuen hat wie bekomme ich aber das nun hin?


Range("G4:I500").Select
Range("G4:I500,K4:N500").Select
Range("G4:I500,K4:N500,B4:B500").Select
Range("G4:I500,K4:N500,B4:B500,D4:E500").Select
Selection.SpecialCells(xlCellTypeBlanks).Select
Selection.FormulaR1C1 = "0"
Range("A4").Select

Gruß
Achim

Antwort 3 von Hajo_Zi

Hallo Achim

Option Explicit

Sub Acim()
On Error Resume Next
Range("G4:I500,K4:N500,B4:B500,D4:E500").SpecialCells(xlCellTypeBlanks) = "0"
End Sub

Gruß Hajo

Antwort 4 von LOL_LOL

muss es vba sein?
wenn nicht, schon mal an die funktion "istleer" gedacht? in verbindung mit "wenn"?

Antwort 5 von achim71

Hallo Hajo,


Danke, für deine Hilfe so langsam wird die Tabelle fertig und das verdank ich nur euch vor allem dir.


Gruß und einen schönen Sonntag
Achim