Increment value on basis of count with button click |excel|VBA|

See more:

MS-Excel

VBA

I want the Value should be Auto Printed Number of Times When Count is Given

it is easy when the Count is 5 or 10 => using Dragging the cell upto particualr count we can get it

what if the count is 100 or more => then Dragging the cell upto that particular row count is bit not effective

when a button is clicked the Data should be auto filled upto that Count in a particular Column

for example :

Image 1
Click here -> Image[^]


If you see my image there is Count and Value as some Data like 'DEMO' When i enter count like 5 then the Data in Value = Demo should be printed that many times as Count is mentioned Under Column => H

Output should be like this Below
Output -> Image[^]

What I have tried:

I have tried this one But not Working ... Suggest me How do i achieve this

Sub Increment()

Dim startValue
startValue = Cells(15, 5).Value

For i = 1 To 10 Step 1
    Cells(i, 5).Value = startValue
    startValue = startValue + 1
Next i
End Sub