leere Zellen mit einer Null "0" füllen
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 schreiben
Antwort 1 von Hajo_Zi vom 11.03.2019, 14:53 Options
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 vom 11.03.2019, 15:35 Options
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 vom 11.03.2019, 15:40 Options
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 vom 11.03.2019, 15:45 Options
muss es vba sein?
wenn nicht, schon mal an die funktion "istleer" gedacht? in verbindung mit "wenn"?
Antwort 5 von achim71 vom 11.03.2019, 15:51 Options
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