Вариант I.
Range("A1,C5:D10,H15").Select
Вариант II.
Union(Range("A1"), Range("C5:D10"), Range("H15")).Select
Выделение несмежных диапазонов используется исключительно для наглядности, в действительности же, реальная необходимость в активации и выделении, возникает крайне редко.