give the numbers between the given number

[mark692]

	A	B	C	D
Range
Row number

<colgroup><col style="width: 25pxpx"><col><col><col><col></colgroup><thead>
</thead><tbody>
[TD="align: center"]1[/TD]

[TD="align: right"]232[/TD]
[TD="align: center"]To[/TD]
[TD="align: right"]240[/TD]

[TD="align: center"]2[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]3[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]4[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]5[/TD]

[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]6[/TD]
[TD="align: right"]232[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]7[/TD]
[TD="align: right"]233[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]8[/TD]
[TD="align: right"]234[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]9[/TD]
[TD="align: right"]235[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]10[/TD]
[TD="align: right"]236[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]11[/TD]
[TD="align: right"]237[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]12[/TD]
[TD="align: right"]238[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]13[/TD]
[TD="align: right"]239[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

[TD="align: center"]14[/TD]
[TD="align: right"]240[/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]
[TD="align: right"][/TD]

</tbody>

Sheet1​

hi guys i want a button that will give the numbers between the given numbers starting on "B1" and ending on "D1" on cell "A6" to down. thanks in advance

 

[footoo]

[A6] = [B1].Value
[A6].AutoFill Destination:=[A6].Resize([D1] - [B1] + 1), Type:=xlFillSeries

 

[Rick Rothstein]

[A6] = [B1].Value
[A6].AutoFill Destination:=[A6].Resize([D1] - [B1] + 1), Type:=xlFillSeries

You might want to clear out any existing values starting with cell A6 in case the new range is smaller than the previous range. With that said, here is an alternate method that the OP can consider...

[table="width: 500"]
[tr]
	[td][A5].CurrentRegion.Offset(1).Clear
[A6].Resize([D1] - [B1] + 1) = Evaluate("ROW(" & [B1] & ":" & [D1] & ")")[/td]
[/tr]
[/table]

 

[mark692]

You might want to clear out any existing values starting with cell A6 in case the new range is smaller than the previous range. With that said, here is an alternate method that the OP can consider...

[TABLE="width: 500"]
<tbody>[TR]
[TD][A5].CurrentRegion.Offset(1).Clear
[A6].Resize([D1] - [B1] + 1) = Evaluate("ROW(" & [B1] & ":" & [D1] & ")")[/TD]
[/TR]
</tbody>[/TABLE]

thank you sir on this