Select every x cell in a range
Closed
matinau
-
Mar 11, 2010 at 06:58 PM
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - Mar 12, 2010 at 04:24 AM
rizvisa1 Posts 4478 Registration date Thursday January 28, 2010 Status Contributor Last seen May 5, 2022 - Mar 12, 2010 at 04:24 AM
Related:
- Select every x cell in a range
- Vba select case like - Guide
- Clear only the formatting from the selected cell (leaving the content) - Guide
- Please insert the correct dvd-rom select ok and restart application nfsmw ✓ - Video Games Forum
- If a cell has text then return value ✓ - Excel Forum
- To create a network bridge you must select at least two lan - Network Forum
1 response
rizvisa1
Posts
4478
Registration date
Thursday January 28, 2010
Status
Contributor
Last seen
May 5, 2022
766
Mar 12, 2010 at 04:24 AM
Mar 12, 2010 at 04:24 AM
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
