Bob,
Thanks once again, it was the double quotes"".

Regards, Rob
"Bob Phillips" wrote in message
...
Rob,

Is this what you want

Range("C1").Formula =
"=VLOOKUP(LEFT(A1,3),myfile.xls!Database,2,FALSE)& A1&"" W/E: ""&Text(B1,
""dd-mmm-yyy"")"

--

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Rob" wrote in message
...
I'm trying without success to place the following formula into cell C1
via
VBA code, the formula works fine within the spreadsheet:

=VLOOKUP(LEFT(A1,3),myfile.xls!Database,2,FALSE)&" "&A1&" W/E:
"&TEXT(B1,"dd-mmm-yyy")

So far i've got this part to work but the A1 and B1 elements just don't
want
to know!

Range("C1").Formula = "=VLOOKUP(LEFT(A1,3),"myfile!Database,2,FALSE) "

Any help will be most welcome. Rob