Range("J7").Value = "VLookup(Month(A4), Data!A1:B14, 2, False)& " " &
YEAR(A4)
you have to use syntax that excel understands for vba
Range("J7").Value = application.VLookup(Month(range("A4"),etc
or put in the formula
Range("J7").formula = "=VLookup(Month(A4), Data!A1:B14, 2, False)& " " &
YEAR(A4)"
and then
Range("J7").value=Range("J7").value



--
Don Guillett
SalesAid Software

"Bill" wrote in message
...
The following code does not work. I am trying to put the result of the
formula into cell J7. Nothing happens.

Range("J7").Value = "VLookup(Month(A4), Data!A1:B14, 2, False)& " " &
YEAR(A4)

Thanks
Bill