Sheet.Range(Sheet,Cells(x,y), Sheet.Cells(x2,y2)) 语法

Question

I would like to add multiple Cells through the.Cells(x,y) Syntax to a Range named "ValueRange" like so:

Dim ws As Worksheet
Dim j As long
Dim Valuerange As Range

j = 6 'rowNumber 6
Set ws = ThisWorkbook.Worksheets("My Worksheet1")
Set Valuerange = ws.Range(ws.Cells(j, 3), ws.Cells(j, 5), ws.Cells(j, 7), ws.Cells(j, 9))

and I would like to Select this range through the same format later after changing j (rowNumber)

ws.Range(ws.Cells(j, 3), ws.Cells(j, 5), ws.Cells(j, 7), ws.Cells(j, 9)).Select

But I always get errors with this Syntax "Wrong Number of Arguments or invalid property assignment"

Can anyone help? Cheers

Answer 1

See comments of question for easy answer through using a Union-Statement instead of Range-Object