Question

This time, I have a cell holding a natural number, let’s say 10. Starting from another cell and for the 9 columns to the right of it, I want to display the numbers 1 through 10. If my reference cell held 20, however, I want to start at the other cell and display the numbers 1 through 20 in 20 columns. I hope you get the gist.

Is there a good way to do this, first of all, without VBA? If not, is there a good way to do this with VBA? Is there some event I should catch on a cell which would allow me to then manually insert the values I want? My knowledge of Excel and VBA is not very good, so sorry if the question is an easy one.

Thank you all in advance!

Answer 1

You won’t be able to use a UDF since values are changed in more than one cell. So the easiest way (with VBA) is probably with the Change event. If the value is in the named range “holdvalue” and you want to start the numbers at range “valueStart” then this will work:

Private Sub Worksheet_Change(ByVal Target As Range)

Dim i As Integer

If Target.Cells.Count > 1 Or IsEmpty(Target) Then Exit Sub

If Target.Address = Range("holdvalue").Address Then
  For i = 1 To Range("holdvalue")
    Range("valueStart").Offset(0, i - 1) = i
  Next i
End If

End Sub

Note: This doesn’t deal with clearing the values.