# Formula help-copy every 100th cell

#### Dumptruck

##### New Member
I have a very large data block (~20,000 rows, single column). I would like to copy every 100th cell over to the next column without any spaces between them (i.e. the end result would be ~200 values with no spaces in-between).

Thanks.

### Excel Facts

VLOOKUP to Left?
Use =VLOOKUP(A2,CHOOSE({1,2},\$Z\$1:\$Z\$99,\$Y\$1:\$Y\$99),2,False) to lookup Y values to left of Z values.

#### Lewiy

##### Well-known Member
Try this macro
Code:
``````Sub HundredthCell()
Dim iStart As Long
Dim i As Long
iStart = Val(InputBox("Please type the number of the first row"))
i = 1
Do
Cells(i, 2) = Cells(iStart, 1)
i = i + 1
iStart = iStart + 100
Loop Until Cells(iStart, 1) = ""
End Sub``````

#### Jonmo1

##### MrExcel MVP
Welcome to the board...

Assuming Data in Column A, results going to column B.
this will get
a1
a101
a201

In B1
=INDEX(A:A,100*(Row(A1)-1)+1)
fill down

Change the Bold Red 1 to determine the Starting Row #.

Hope that helps..

#### Dumptruck

##### New Member
Worked great jonmo1, thanks for the help.

##### MrExcel MVP
If you want it to be robust...

The data to copy in A1:A10000 and the copy starts in B1...

=INDEX(\$A\$1:\$A\$10000,(ROWS(\$B\$1:B1)-1)*100)

Replies
3
Views
153
Replies
1
Views
41
Replies
6
Views
337
Replies
6
Views
114
Replies
1
Views
142

1,126,944
Messages
5,621,750
Members
415,854
Latest member
Tutu123

### We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

### Which adblocker are you using?

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

### Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

### Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

### Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back