Select every x cell in a range
Closed
matinau
-
11 Mar 2010 à 18:58
rizvisa1 Posts 4478 Registration date Thursday 28 January 2010 Status Contributor Last seen 5 May 2022 - 12 Mar 2010 à 04:24
rizvisa1 Posts 4478 Registration date Thursday 28 January 2010 Status Contributor Last seen 5 May 2022 - 12 Mar 2010 à 04:24
Related:
- Select every x cell in a range
- Vba select case like - Guide
- How to increase wifi range - Guide
- Excel vba range find - Guide
- How to delete a cell in word - Guide
- To create a network bridge you must select - Windows Forum
1 response
rizvisa1
Posts
4478
Registration date
Thursday 28 January 2010
Status
Contributor
Last seen
5 May 2022
766
12 Mar 2010 à 04:24
12 Mar 2010 à 04:24
Try this
sub selectRange()
Dim myRangeCol As Range
Dim lLastRangeStartRow As Long
Set myRangeCol = Range("c1:j1")
lLastRangeStartRow = 45
For i = 9 To lLastRangeStartRow Step 9
Set myRangeCol = Union(myRangeCol, Range(Cells(i, "C"), Cells(i, "J")))
Next
myRangeCol.Select
End Sub
