Vba for formatting cell

[Alpacino]

Hi again
I would like a vba to convert values from a range Z4:Z35 then copy to C4:C35
Say the value in Z4 is 34 I like to multiple the value by 1000 then copy new format to C4.

At the moment I have to do a sum formula into Y4 =SUM(Z4*1000) then copy values to C4. I just want to bypass this painful way of doing it

Thanks for ur help
Alan

 

[id107]

Yep.

    With Range("C4:C35")
        .Formula = "=VLOOKUP(A4,sales,2,0)*1000"
        .Value = .Value
    End With