Training Report - VB & IF Function help required

I have a training report that basically dumps data in an excel file from our training database and we need to manually manipulate the results to get what we want. I've been trying to cut out the manual manipulation of the data as there are over 10,000 rows for each of our offices and I need some assistance.

1) Firstly, the data for each employee only appears once (Full Name, Emp No & Job Title). I added the following to VB and can get the First name to auto populate the rows that follow but can't amend to do the same for Emp No & Job Title. Can anyone assist?

Sub Populate()
For xRow = 4 To Cells(Rows.Count, "E").End(xlUp).Row
    If (Len(Cells(xRow, 1).Value) < 1) Then
        Cells(xRow, 1).Value = Cells(xRow - 1, 1).Value
    End If
Next xRow
End Sub

2) I want to identify courses with an expiry date less than or equal to 3 months from today. I can get this to work by inserting a Refresher Needed column with IF(F3<-TODAY(),"TRAINING NEEDED","COMPLETE") however if the expiry date field is blank I want the Refresher Needed column to be blank also. I tried to use ISBLANK but with no success.

Appreciate any assistance with these!

T