## How to identify missing numbers sequence in Excel?

Let's say you have a long list of sequence numbers to mark items, such as check numbers in bank statements, normally we scrolling through and locate the missing sequence numbers manually. Sometimes this is quite arduous and time-consuming. You may think of tricky ways to deal with it. Yes, there are several easy ways to identify and locate missing numbers sequence in Excel 2007, Excel 2010, and Excel 2013 quickly and conveniently.

**Identify missing numbers sequence with IF formula**

**Identify missing numbers sequence with an array formula**

**Identify missing numbers sequence with VBA code**

**Recommended Productivity Software**

**Office Tab**:

**Use tabbed interface in Office**as the use of web browser Chrome, Firefox and Internet Explorer.

**Kutools for Excel**: Adds 120 powerful new features to Excel.

**Increase your productivity in 5 minutes. Save two hours every day**!

**Classic Menu for Office**:

**Brings back your familiar menus**to Office 2007, 2010 and 2013 (includes Office 365).

We will show you the tutorials with an example as following screenshot shows:

** Identify missing numbers sequence with IF formula**

**Hint**

As we kwon, most of sequence numbers are with fixed increment of 1, such as 1, 2, 3, …, N. Therefore, if you can identify the number is not less 1 than its following number, there is a missing number.

1. In a blank cell, enter the formula of ** =IF(A2-A1=1,"","Missing")**, and press the

**Enter**key. In this case, we enter the formula in Cell C1.

If there is no missing numbers, this formula will return nothing; if missing numbers exist, it will return the text of "Missing" in active cell.

2. Select the cell C1 and drag the fill handle over the range of cells that you want to contain this formula. Now it identifies the missing numbers with the text of "Missing" in corresponding cells of Column C. See the following screenshot:

** Identify missing numbers sequence with an array formula**

Sometimes it requires not only identifying missing numbers sequence, but also listing missing numbers too. You can deal it with following steps:

1. in the adjacent cell, please enter the formula **= SMALL(IF(ISNA(MATCH(ROW(A$1:A$30),A$1:A$30,0)),ROW(A$1:A$30)),ROW(A1))**

**A1:A30** = range of numbers

The sequence to check against is 1 to 30

2. Press the** Ctrl + Shift + Enter** Keys together to finish the formula. Copy down the formula until you get #NUM! errors meaning all missing numbers have been listed. See screenshot:

** Identify missing numbers sequence with VBA code**

With following VBA code, you can also get the missing numbers sequence in a new worksheet. Please do as this:

1. Hold down the** ALT + F11** keys, and it opens the **Microsoft Visual Basic for Applications** window.

2. Click **Insert** >** Module**, and paste the following macro in the Module Window.

*Sub Missingvalues()*

*Dim rng As Range*

*Dim rng1 As Range*

*Dim StartV As Single, EndV As Single, i As Single, j As Single*

*Dim k() As Single*

*Dim WS As Worksheet*

*ReDim k(0)*

*On Error Resume Next*

*Set rng = Application.InputBox(Prompt:="Select a range:", _*

*Title:="Extract missing values", _*

*Default:=Selection.Address, Type:=8)*

*StartV = InputBox("Start value:")*

*EndV = InputBox("End value:")*

*On Error GoTo 0*

*Set WS = Sheets.Add*

*WS.Range("A1:A" & rng.Rows.CountLarge).Value = rng.Value*

*With WS.Sort*

* .SortFields.Add Key:=WS.Range("A1"), _*

* SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal*

* .SetRange Range("A1:A" & rng.Rows.CountLarge)*

* .Header = xlNo*

* .MatchCase = False*

* .Orientation = xlTopToBottom*

* .SortMethod = xlPinYin*

* .Apply*

*End With*

*Set rng1 = WS.Range("A1:A" & rng.Rows.CountLarge)*

*For i = StartV To EndV*

* On Error Resume Next*

* j = Application.Match(i, rng1)*

* If Err = 0 Then*

* If rng1(j, 1) <> i Then*

* k(UBound(k)) = i*

* ReDim Preserve k(UBound(k) + 1)*

* End If*

* Else*

* k(UBound(k)) = i*

* ReDim Preserve k(UBound(k) + 1)*

*End If*

* On Error GoTo 0*

*Next i*

*ReDim Preserve k(UBound(k) - 1)*

*WS.Range("B1") = "Missing values"*

*WS.Range("B2:B" & UBound(k) + 1) = Application.Transpose(k)*

*End Sub*

3. Click button to run the code, and a prompt box will pop out to tell you select a range that you want to use. See screenshot:

4. Then click **OK**, and enter the start value of your number sequence in the pop outing box.

5. And go on clicking **OK**, enter the end value of the number sequence. (*Note: you must add 1 for your displayed end value*, if your last value is 30, you should enter 31.) See screenshot:

6. Then click **OK**, and the missing numbers have been listed into a new worksheet. See screenshot:

**Is your problem solved?**

**Yes, I want to be more efficiency and save time when using Excel**

**No, the problem persists and I need further support**

**Recommended Productivity Tools**

**Office Tab**:

**Using handy tabs in your Office**, as the way of Chrome, Firefox and New Internet Explorer.

**Kutools for Excel**: 120 powerful new functions for Excel,

**Increase your productivity in 5 minutes. Save two hours every day!**

**Classic Menu for Office**:

**Bring back familiar menus to Office**2007, 2010, 2013 and 365, as if it were Office 2000 and 2003.

**Kutools for Excel**

Amazing! Increase your productivity in 5 minutes. Don't need any special skills, save two hours every day!

More than 120 powerful advanced functions which designed for Excel:

- Merge Cell/Rows/Columns without Losing Data.
- Combine and Consolidate Multiple Sheets and Workbooks.
- Compare Ranges, Copy Multiple Ranges, Convert Text to Date, Unit and Currency Conversion.
- Count by Colors, Paging Subtotals, Advanced Sort and Super Filter,
- More Select/Insert/Delete/Text/Format/Link/Comment/Workbooks/Worksheets Tools...