[DrCon]

Hallo erstmal,

mir qualmt der Kopf

Ich habe fogendes Problem:

Ich brauche einen VBA-Code, welcher in Zelle F7:AJ66 (wenn die Zelle keinen Wert oder Buchstaben enthält) eine 0 einträgt.
soweit so gut:

Sub Nullwennleer()

Dim Zelle As Range
For Each Zelle In Selection
If Zelle.Value = "" Then
Zelle.Value = 0
End If
Next Zelle

End Sub

[img]http://www.bilder-upload.eu/show.php?file=fbe052-1530721416.jpg[/img]


Der Code soll aber vorher die dazu gehörige Spalte D überprüfen, ob das etwas steht, erst dann F:AJ mit 0en füllen.

Ich hoffe, ihr könnt mir helfen.

Grz