Create a pop up box for user data input that auto formulates specific cells

Hi,

This can be done with VBA, which is the Excel scripting language.

Anyway, I've done this for you in the attached file.

This solution is powered by this code:

Sub Workbook_Open()
    'Written by Haytham Amairah
    'Last updated on 5/3/2018
    
    Dim number As Integer
    number = Application.InputBox("Please enter a number:")
    
    Dim scell As Range
    Set scell = Application.InputBox("Please select the starting cell:", , , , , , , 8)
       
    For counter1 = 1 To number
        Dim r1 As Integer
        r1 = counter1 - 1
        scell.Offset(r1).Value = counter1
    Next counter1
    
    For counter2 = number To 1 Step -1
        Dim r2 As Integer
        r2 = Abs(counter2 - number)
        scell.Offset(r2, 1).Value = counter2
    Next counter2
 
End Sub

Please follow this https://support.office.com/en-us/article/automatically-run-a-macro-when-opening-a-workbook-1e55959b-e077-4c88-a696-c3017600db44 to learn how to inject your own workbook with this code!

I hope this helps you

Haytham