Markere flere celler i VBA

Hej

Hvordan angiver man at der skal markeres flere celler på én gang?

Simplet eksempel:

Sub marker()
Dim x As Variant

x = 2
Cells(2, x).Select

x = x + 2
Cells(2, x).Select

x = x + 2
Cells(2, x).Select

End Sub

I dette tilfælde skifter den mellem cellerne, hvorimod jeg gerne vil have at den markerer dem så jeg kan kopierer dem på én gang.