/ Published in: VB.NET
Select discrete cells in a sheet
Expand |
Embed | Plain Text
Copy this code and paste it in your HTML
Sub SelectDiscreteCells() ' ' Select discrete cells ' Dim range Set range = Selection Dim i As Long For i = 1 To 9 ActiveCell.Offset(10, 0).Select Set range = Union(range, Selection) Next i range.Select End Sub