Range("B5").Select
Selection.CurrentRegion.Select
Selection.SpecialCells(xlCellTypeBlanks).Value = 0
Klaus
Andreas Aust schrieb in Nachricht <3EF80CE1...@zv.fhg.de>...
Ganz ohne VBA:
a) gewünschten Bereich markieren
b) Strg + h drücken (d.h. ersetzen)
c) Suchen nach leer lassen
d) Ersetzen durch 0
e) "Alle ersetzen" anklicken
fertig! ;-)
mfG
Franz
"Andreas Aust" <au...@zv.fhg.de> schrieb im Newsbeitrag
news:3EF80CE1...@zv.fhg.de...