Formula or code to delete cells if no text is entered inside them

Dear Excel Gods,

I am making a buiness card request form, which I have attached. On the Master Sheet (Sheet 1), the user enters in his/her personal data, such as his name address, phone number, etc. After he/she finished entering all the relevant data, Business Card Layout (Sheet 2) automatically populates and shows the user what their business card will look like.

Everything works fine, however I just realized that the contact information might vary from person to person. Right now, a person can enter 5 different contact information, but most of them will probably only choose four.

I wanted to know how to shift the cells down if the user does not fill out one of the contact information. I know that this is a very specific request, but I really would appreciate any advice.

Thanks,

Sajan

Sub Delete_Rows()
Dim rng As Range, cell As Range, del As Range
Set rng = Intersect(Range("D1:D500"), ActiveSheet.UsedRange)
For Each cell In rng
If (cell.Value) = " " _
Then
If del Is Nothing Then
Set del = cell
Else: Set del = Union(del, cell)
End If
End If
Next cell
On Error Resume Next
del.EntireRow.Delete
End Sub

Not sure if this will help but if you change the range to what ever you column you want to decide has the missing info so eeither column B Oe Column E for you

Thanks for the quick reply, let me try this out and see if it works.