Robert has a series of numbers in column A that range from 1 to 100. He would like to extract only those values between 65 and 100, inclusive, and place them in column B. He wonders if there is a way to do that easily.

The short answer is that there is a very easy way to do it, provided you don't mind sorting the list of numbers. Follow these steps:

- Select a cell in column A. (It doesn't really matter which cell you select, as long as it is one of the cells that contains a number.)
- Display the Data tab of the ribbon.
- Click the Sort Smallest to Largest tool, in the Sort & Filter group. Excel sorts all the numbers in the column.
- Select the numbers that you want to put into column B.
- Press
**Ctrl+X**to cut the cells to the Clipboard. - Select cell B1 (or the first cell in column B where you want the values to appear).
- Press
**Ctrl+V**to paste the cells into the column.

That's it; you've now got the desired cells into column B. If you simply wanted to copy the cells, then in step 5 you could have pressed **Ctrl+C** instead.

If you need to keep the values in column A in their original order (minus the values you want to move), you can do it by using column B as a "place retainer" column. To the right of the first value in column A, put the vaue 1. Then, below that in column B put a 2, then a 3, and so on, until each value in column A has a corresponding value in column B that indicates the numbers location. Then, follow these steps:

- Select a cell in column A. (It doesn't really matter which cell you select, as long as it is one of the cells that contains a number.)
- Display the Data tab of the ribbon.
- Click the Sort Smallest to Largest tool, in the Sort & Filter group. Excel sorts all the numbers in the column.
- Select the numbers in column A that you want to move, along with the numbers to the right of them in column B.
- Press
**Ctrl+X**to cut the cells to the Clipboard. - Select cell D1. (It is important to select cell D1 because you need to leave column C blank.)
- Press
**Ctrl+V**to paste the cells into columns D and E. - Select a cell in column B.
- Display the Data tab of the ribbon.
- Click the Sort Smallest to Largest tool, in the Sort & Filter group. Excel sorts all the numbers in the column based on the values in column B.
- Select a cell in column E.
- The Data tab of the ribbon should still be displayed.
- Click the Sort Smallest to Largest tool, in the Sort & Filter group. Excel sorts all the numbers in the column based on the values in column E.
- Delete columns B, C, and E.

At this point the values in columns A and B reflect their original order, from when they were all in column A.

Another way to move the cells is to use the filtering capabilities of Excel. Follow these steps:

- Select a cell in column A. (It doesn't really matter which cell you select, as long as it is one of the cells that contains a number.)
- Display the Data tab of the ribbon.
- Click the Filter tool. Excel adds a filter drop-down arrow at the right side of the column A header.
- Click the down-arrow and choose Number Filters | Between. Excel displays the Custom AutoFilter dialog box. (See Figure 1.)
- In the Greater Than or Equal To box, enter 65.
- In the Less Than or Equal To box, enter 100.
- Click OK. Excel limits what is shown to only those rows that meet the criteria you specified in steps 4 through 6.
- Select the cells that are displayed.
- Press
**Ctrl+C**to copy the cells to the Clipboard. - Select cell B1 (or the first cell in column B where you want the values to appear).
- Press
**Ctrl+V**to paste the cells into the column. - Select one of the cells in column A.
- Again click the Filter tool. (The Data tab of the ribbon should still be displayed.) Excel removes the filter you previously applied.

** Figure 1.** The Custom AutoFilter dialog box.

You could also use formulas in column B to pull out the values that are within the desired range. An easy way to do this is to place this formula in cell B1:

=IF(AND(A1>=65, A1<=100),A1,"")

Copy the formula down as far as necessary in column B and you end up with any values in the range of 65 to 100, inclusive, being "copied" into column B. If the value is outside this range, then the cell in column B is left empty.

Assuming that you don't want any empty cells in column B, then you could use an array formula to grab the values. If your values are in the range A1:A500, place the following in cell B1:

=IFERROR(INDEX(A$1:A$500,SMALL(IF(A$1:A$500>=65,ROW($1:$500)),ROW())),"")

Enter it using Ctrl+Shift+Enter, and then copy the formula down as far as you'd like.

There are, of course, macro-based solutions you can use. These are helpful if you need to perform this task quite a bit with data that you retrieve from an outside source. The following is a simple example of a macro you could use:

Sub ExtractValues1() Dim x As Integer x = 1 For Each cell In Selection If cell.Value >= 65 And cell.Value <= 100 Then Cells(x, 2) = cell.Value x = x + 1 End If Next cell End Sub

You use the macro by selecting the cells you want evaluated in column A and then running it. It looks at each cell and copies the value to column B. The original value in column A is left unchanged.

For more flexibility you could rely on asking the user for the lower and upper values, as shown in this macro:

Sub ExtractValues2() Dim iLowVal As Integer Dim iHighVal As Integer iLowVal = InputBox("Lowest value wanted?") iHighVal = InputBox("Highest value wanted?") For Each cell In Range("A:A") If cell.Value <= iHighVal And cell.Value >= iLowVal Then ActiveCell.Value = cell.Value ActiveCell.Offset(1, 0).Activate End If Next End Sub

Before you run the macro, select the cell at the top of the range where you want the extracted values placed. Nothing in column A is affected; only the values between the lower and upper range are copied to the new location.

*Note:*

If you would like to know how to use the macros described on this page (or on any other page on the *ExcelTips* sites), I've prepared a special page that includes helpful information. Click here to open that special page in a new browser tab.

*ExcelTips* is your source for cost-effective Microsoft Excel training.
This tip (13397) applies to Microsoft Excel 2007, 2010, and 2013.

**Create Custom Apps with VBA!** Discover how to extend the capabilities of Office 2013 (Word, Excel, PowerPoint, Outlook, and Access) with VBA programming, using it for writing macros, automating Office applications, and creating custom applications. Check out *Mastering VBA for Office 2013* today!

Copy a formula from one place to another and Excel helpfully adjusts the cell references within the formula. That is, it ...

Discover MoreWant a quick way to enter a series of single digits into consecutive cells? The best approach is with a macro, and this ...

Discover MoreIf you have added subtotals to your worksheet data, you might want to copy those subtotals somewhere else. This is easy ...

Discover More**FREE SERVICE:** Get tips like this every week in *ExcelTips,* a free productivity newsletter. Enter your address and click "Subscribe."

2019-09-12 10:12:56

Peter Atherton

Aaron

The best way to get duplicate values is show @ https://exceljet.net/formula/get-nth-match-with-index-match. The page show the logic behind it as well. Here is my own version that gets person's sales between two dates. It is committd with Ctrl + Shift + Enter so making it an array formula.

=IFERROR(INDEX($D$2:$D$30,SMALL(IF(($I$2=$A$2:$A$30)*($J$2<=$B$2:$B$30)*($K$2>=$C$2:$C$30),ROW($D$2:$D$30)-ROW($D$2)+1),ROW(1:1))),"")

The image shows the data

(see Figure 1 below)

**Figure 1.**

2019-09-11 05:34:46

Aaron Casper

i need to extract data in a range, this formula is working fine but its not showing duplicate values. is there any chance that i get duplicate value too?

=INDEX($B$36:$V$36,MATCH(1,INDEX(($B$36:$V$36=LARGE($B$36:$V$36,ROWS(AB$7:AB13)))*(COUNTIF(AB$7:AB13,$B$36:$V$36)=0),),0))

2019-05-01 09:45:59

Jeffrey Harrison

For being able to have a header row...

{=IFERROR(INDEX(A$2:A$55,SMALL(IF((A$2:A$16>=65)*(A$2:A$55<101),ROW($1:$54)),ROW()-1)),"")}

And if the value you want is in a different field than the numbers you are testing against...

{=IFERROR(INDEX(B$2:B$55,SMALL(IF((A$2:A$16>=65)*(A$2:A$55<101),ROW($1:$54)),ROW()-1)),"")}

2016-11-14 16:30:57

Nathan Gruetzmacher

Thank you,

Nathan

2015-08-24 05:47:40

Russell Gorton

=IFERROR(INDEX(A$1:A$54,SMALL(IF((A$1:A$54>=65)*(A$1:A$54<101),ROW($1:$54)),ROW())),"")

Or

=IFERROR(INDEX(A$1:A$54,SMALL(IF(A$1:A$54>=65,IF(A$1:A$54<101,ROW($1:$54))),ROW())),"")

2015-08-08 14:06:24

Steve Symes

If(A1>64,A1,"")

and copy this formula down column B as far as required

2015-08-08 12:11:09

Every day I look forward to receiving your Excel Tips, Word Tips and the weekend tips as well.

Again thank you very much.

Bob Lilly

2015-08-08 11:13:14

Ken Maltese

Got a version of Excel that uses the
ribbon interface (Excel 2007 or later)?
**This site is for you!** If you
use an earlier version of Excel, visit
our *ExcelTips* site focusing on the menu interface.

**FREE SERVICE:** Get tips like this every week in *ExcelTips,* a free productivity newsletter. Enter your address and click "Subscribe."

Copyright © 2020 Sharon Parq Associates, Inc.

## Comments