If Null Set Value to Zero

[Guest]

Please help me modify the VBA code listed below.

If the value for Volume is Null then return a value of zero.

Thanks,



With Sheets("Sheet1")
.Cells(RowCount, "A") = Team
.Cells(RowCount, "B") = Volume
.Cells(RowCount, "C") = Date
End With

 

[Keith74]

With Sheets("Sheet1")
.Cells(RowCount, "A") = Team
.Cells(RowCount, "B") = iif(isnull(Volume) = true,0,Volume)
.Cells(RowCount, "C") = Date
End With

hth

Keith

 

[Guest]

Sub routine()
With Sheets("Sheet1")
.Cells(RowCount, "A") = Team
If Volume = "" Then
.Cells(RowCount, "B") = 0
Else
.Cells(RowCount, "B") = Volume
End If
.Cells(RowCount, "C") = Date
End With
End Sub