somethinglike

Sub Macro1()
Dim cl As Range
For Each cl In Range("A:A")
If Not IsEmpty(cl) Then
ActiveCell.Offset(0, 2).Formula =
Application.Worksheetfunction.VLookup(....)
End If
Next cl
End Sub


http://www.excel-ant.co.uk

Steph wrote:
Hi. Is there a way to have excel scan a column, and if a cell in column A
is not blank, then insert a Vlookup formula in the same row, column C. If
the cell in column A is blank, then do nothing and move to the next cell.
Thanks!