vba that converts blank to a zero automatically

[omairhe]

Hi people... looking for a vba change event for Cell F3
therefore;
If Cell F3 = Blank
then Cell F3 changevalue to = 0

Will appreciate help..

 

[mikerickson]

If Range("F3").Value = vbNullString Then Range("F3").Value = 0

 

[VoG]

Try

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "F3" And Target.Value = "" Then
    Application.EnableEvents = False
    Target.Value = 0
    Application.EnableEvents = True
End If
End Sub

 

[omairhe]

If Range("F3").Value = vbNullString Then Range("F3").Value = 0

Many Thanks Mike

 

[omairhe]

Try

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(False, False) = "F3" And Target.Value = "" Then
    Application.EnableEvents = False
    Target.Value = 0
    Application.EnableEvents = True
End If
End Sub

Thanks Mike code works but i give it a try