Hi everybody,

I just want to fill different non contiguous ranges from an original cell containing 
Sum(E1:E4)
. Here's the code (wich doesn't work, just to get the idea clearer):

Selection.AutoFill Destination:=Range("K1:K4", "O1:O5", "Q1:Q5"), Type:=xlFillDefault
i don't know the correct synthax.
Thanks for your help