I'm trying to copy and paste data from one sheet to another and thought it
would be useful to group a range rather than each cell and then paste. Am I
able to create variables for ranges? I don't seem to be able to make it
work. The code I've got is:

Dim Cases as Range

Cases = Range("B25,B27,B29,B30,B31").Value

Range("B5").Select
ActiveCell.Value = Cases

That's with a few things cut out but you get the picture. Anyway, the macro
is giving a 91 bug and stopping as the Cases = Range part.

Any ideas would be very helpful.