Hi,

Am Thu, 7 Feb 2013 01:45:51 -0800 (PST) schrieb oercim:

For i = 1 To 10
Sheets("Sheet1").Cells(i,2)) = "=VLOOKUP(C1,?LK1!C2:C54," & CStr(i) & ",0)"
Next

you have an error in the syntax:
For i = 1 To 10
Sheets("Sheet1").Cells(i, 2).Formula = " _
=VLOOKUP(C1,'ILK1'!C2:C54," & i & ",0)"
Next


Regards
Claus Busch
--
Win XP PRof SP2 / Vista Ultimate SP2
Office 2003 SP2 /2007 Ultimate SP2