If DblBalance <> 0 Then

let x = 12

if x <> 0 then
    //code

Sub testing()

X  = Cells( 1,1).value

If x <> "" then

Msgbox " cell is filled"

Else

Msgbox "empty"

End if

End sub