Searching for non null cells
 

I'd like to create a scrip that searches a column for non null cells. Then
when it finds the non null cell it displays the cell name (i.e a10)
any suggestions?

Thanks,

Searching for non null cells
 

Hi

Look at this:

Sub FindNonNullCells()
Dim TargetCol As String
Dim LastRow As Long

TargetCol = "A"
LastRow = Cells(Rows.Count, TargetCol).End(xlUp).Row

For r = 1 To LastRow
If Range(TargetCol & r).Value = "" Then
msg = MsgBox("Null cell found in : " & TargetCol & r)
End If
Next
End Sub

Regards,
Per

"Jeff" skrev i meddelelsen
...
I'd like to create a scrip that searches a column for non null cells.
Then
when it finds the non null cell it displays the cell name (i.e a10)
any suggestions?

Thanks,