Best Method to Fix Computer Errors

Sunday, 6 March 2016

Avoid duplicate entries in a table

We use a table to enter all of our A/P invoices. Is there a way to avoid entering an invoice twice by searching the cells above for the duplicate number for that vendor? The vendor's name is entered in one column, the invoice # is entered in a different
column
Thanks for any help!

Solutions to the Problem Avoid duplicate entries in a table

Download SmartPCFixer to Fix It (Free)

You will need a macro to prevent any duplicates from being entered into your invoice table.
Assuming that invoice numbers are unique, i.e.
different vendors do not use the same numbers, try this macro:
Right click on the worksheet tab and select "View Code".
Enter the below macro in the top right window.
Private Sub Worksheet_Change(ByVal Target As Range)
Set firstinvoice = Range("C2")
If Not Intersect(Target, firstinvoice.EntireColumn) Is Nothing Then
    If Target.row > firstinvoice.row Then
      If WorksheetFunction.CountIf(firstinvoice.Resize(Target.row - firstinvoice.row), Target.Value) > 0 Then
        MsgBox "Invoice number " & Target.Value & " is already entered", vbOKOnly + vbCritical, "Invalid entry"
        Target.Value = ""
      End If
    End If
End If
End Sub
Change the "C2" to the cell where your first invoice number is.
Hope this helps / Lars-Åke

If you failed to fix it, another option is to call Microsoft and walk through the process with a technician. To do this, dial "1-800-936-5700". Explain the error that you received and the steps in the update process during which it was displayed. The technician will be able to walk through the steps from getting a new product key to finishing the installation.

Recommended Method to Fix the Problem: Avoid duplicate entries in a table:

How to Fix Avoid duplicate entries in a table with SmartPCFixer?

1. Click the button to download Error Fixer . Install it on your computer. Open it, and it will perform a scan for your system. The junk files will be shown in the scan result.