Paste values multiple ranges

[Thomazz]

Probably a very easy thing to do if you are a bit handy with VBA, but can't figure it out.

I have multiple ranges in a sheet (D19:O19 ; D21:O25 ; D29:O36 ; D42:045 ; about 30 different combinations). I want to select those ranges and make values out of them. I don't mean handselecting them (by pressing Ctrl), I mean Excel should select them for me and then create values out of them.

I'm assuming it's not possible to do it all at once, so I probably need to create some sort of loop.

What's the best way of doing this ?

Thanks a million.

 

[bobsan42]

Dim a , rng as range, i as long
a = split ("D19:O19,D21:O25,D29:O36,D42:045",",")
For i = Lbound(a) to ubound(a)
rng(a(i)). select
Next i

The Select is just for example. Don't use it ?

 

[Fluff]

Is this what you mean

Dim Rng As Range
For Each Rng In Range("D19:O19,D21:O25,D29:O36,D42:045").Areas
   Rng.Value = Rng.Value
Next Rng

 

[Thomazz]

Absolutely. Thanks, it's really appreciated !