Nullenauffüllen
Volker
Sub Nullenauffüllen()
Dim Zelle As Range
Sheets("Nullen").Activate
Set Bereich = Range("B2:H10")
For Each Zelle In Bereich
If Zelle.Value = " " Then
Zelle.Value = 0
End If
Next
End Sub
Es kommt die Fehlermeldung Variable=(Bereich) nicht definiert!!
Was muß ich machen?
Vielen Dank für euer Bemühungen!!!