Select discrete cells


/ Published in: VB.NET
Save to your folder(s)

Select discrete cells in a sheet


Copy this code and paste it in your HTML
  1. Sub SelectDiscreteCells()
  2. '
  3. ' Select discrete cells
  4. '
  5.  
  6. Dim range
  7. Set range = Selection
  8. Dim i As Long
  9. For i = 1 To 9
  10. ActiveCell.Offset(10, 0).Select
  11. Set range = Union(range, Selection)
  12. Next i
  13. range.Select
  14. End Sub

Report this snippet


Comments

RSS Icon Subscribe to comments

You need to login to post a comment.