Creating a Number Sequence based on a for loop.

[TheStobi]

Hello Everyone,
I am a Newby to Excel VBA and as such, not competent at all. I am trying to create a number counter which runs up to a value which is determined by a COUNTIF Statement in the spreadsheet. I can get the number counter to run to the given value. However, due do formatting reasons I do not want the counter to start in cell A1 but A3 instead. Any Ideas on how I could solve this issue? Thanks a lot in advance!!!Hello Everyone,
I am a Newby to Excel VBA and as such, not competent at all. I am trying to create a number counter which runs up to a value which is determined by a COUNTIF Statement in the spreadsheet. I can get the number counter to run to the given value. However, due do formatting reasons I do not want the counter to start in cell A1 but A3 instead. Any Ideas on how I could solve this issue? Thanks a lot in advance!!! Essentially my code looks like this:

...
ActiveSheet.Cells(3, 1).Select


Dim i As Integer

For i = 1 To Range("A1")
Cells(i, 1) = i
Next i
...

 

[bbott]

Welcome to the board.

I'm not sure I fully understand, but try running this and see if it's what you're looking for:

Sub CountIt()

Dim i as Integer

For i = 1 to Range("A1").Value
Range("A" & i).Offset(2,0) = i
Next i

End Sub

 

[TheStobi]

Hi bbott,

thanks a million! That is exactly what I was looking for!!!

 

[bbott]

You're welcome.

Thanks for the feedback.