Convert simple formulas into vba code for range cells

[asar90]

Hi friends,
I have to convert formula into vba code for a range cell
for Eg:formula for a single cell Say C2 = LEFT(L2,FIND(" ",L2,1)-1);

I want to put this formula into vba code for range cells say C2:C

I know this Is Simple but I'm very new to this!

Any Help

Thanks in Advance......

 

[Michael M]

Change the range reference in "C" to suit

Range("C2:C100").Formula = "=LEFT(L2,FIND("""",L2,1)-1)"

 

[asar90]

Thanks Dude!

It's Work

 

[Michael M]

Pleasure....

If you wanted to make it dynamic, try

sub MM1
dim lr as long
lr = cells(rows.count,"L").end(xlup).row
Range("C2:C" & lr).Formula = "=LEFT(L2,FIND("""",L2,1)-1)"
end sub