Edit a working macro so it can check a value in a cell

Good day to all in first place

I am new to VBA and need some help to edit a working macro so it can check a value in a cell, I do this processe ever month for 500 sheets

Example of what is working at the momente:

Sub Imprimir()
With Worksheets("Francisco")
With .Range("L4")
If IsNumeric(.Value) Then
.Value = .Value + 1
.Parent.PrintOut preview:=False
Else
MsgBox "Cell isn't numeric!"
End If
End With
End With
End Sub

Now what I need is to check if cell (D4) has text(employer name) or ( 0 ) 0=employer no longer works with us there for don't need to print

Hope the information is enough
Thanks a lot!!!!

sorry posted out of place how can I delete the post