excel vba range property non contiguous ranges

[Ramo964516]

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

[Bob Phillips]

Why are you using autofll rather than just copy? Should the 2nd and 3rd range be 4 cells, not 5?

[Ramo964516]

i want to do just like in the image. i don't know how exactly to do it, i was trying by using autofill but perhaps there is a better solution

Attachment 15554

[Bob Phillips]

Like this

    Range("F8").Copy Range("F9, F12:F13, F15:F16, F18, F20")

[Ramo964516]

It works perfectly well. Thank you xld for your help, that's what i was looking for.