Selecting Every Nth Cell by Column

[VBANate]

Hey Guys,

Is there a way to write a macro in VBA to select every nth cell by column?

Also, is there one to select every nth row by column?

Thanks,

Nate

 

[njimack]

Yes, but it's rarely necessary to select cells to perform actions on them...

Sub Macro1()

Dim i As Long


Application.ScreenUpdating = False


For i = 1 To 100 Step 10
    Cells(1, i) = i
Next i


Application.ScreenUpdating = True


End Sub

 

[VBANate]

Yes, but it's rarely necessary to select cells to perform actions on them...

Sub Macro1()

Dim i As Long


Application.ScreenUpdating = False


For i = 1 To 100 Step 10
    Cells(1, i) = i
Next i


Application.ScreenUpdating = True


End Sub

Thanks a lot!

 

[VBANate]

Yes, but it's rarely necessary to select cells to perform actions on them...

Sub Macro1()

Dim i As Long


Application.ScreenUpdating = False


For i = 1 To 100 Step 10
    Cells(1, i) = i
Next i


Application.ScreenUpdating = True


End Sub

I just tested your code and found that it does not select every nth cell. It numbers them.

 

[njimack]

Yes,the sample of code I posted was to demonstrate that you don't need to select cells to performactions on them

 

[VBANate]

Unfortunately, I need a code that can select every Nth Cell by column.

For example, D1, D3, D5, D7, ..., D10001

 

[njimack]

It's rarely necessary to select cells. What do you want to do to the cells?