How to create automated list based on criteria

Angelfish13

New Member
Joined
Jan 25, 2017
Messages
14
Hello,

I am currently manually creating a list in excel that is taking a very long time. I was wondering if there is a way to automate this. Please see below for an example. Thank you so much for your help!

Columns for the criteria:
NameNumber of Orders Placed
Justin2
Bob3
Fred0
Sally1
Mary0

<tbody>
</tbody>


List I manually enter based on columns above (another column in excel):
People with Zero Orders
Fred
Mary

<tbody>
</tbody>

The list I manually enter actually takes forever because there is hundreds of names and they are all scrambled with people who have a lot of orders. All I am doing is looking who has a zero next to their name and typing their name in another column in a list format. Is there any way to have excel do this automatically with a formula or macro? Please let me know, thanks so much for your help!
 

Excel Facts

What is the last column in Excel?
Excel columns run from A to Z, AA to AZ, AAA to XFD. The last column is XFD.
In another column and in the same row as Justin... =IF(B2=0,A2,"") and pull down as far as your people list goes.


Howard
 
Upvote 0
So if I understand you correctly if "John" is in column "A"

And column B next to "John" is "0" this being a actual zero you want John entered into column "E" for example
And John may be in column "A" more then once but if he ever has a empty space in column "B" next to his name you want his named shown in column "E" only once.
Now if you mean Column "B" would be empty not having a actual Zero remove the 0 in my script and just have it like: "" not "0"
If that is true try this Vba Macro:

Code:
Sub Test()
Application.ScreenUpdating = False
Dim i As Long
Dim x As Long
Dim Lastrow As Long
Lastrow = Cells(Rows.Count, "A").End(xlUp).Row
x = 1
    For i = 1 To Lastrow
        If Cells(i, 2).Value = "0" Then
            Cells(x, 5).Value = Cells(i, 1).Value
            x = x + 1
        End If
    Next
Range("E1:E" & Cells(Rows.Count, "E").End(xlUp).Row).RemoveDuplicates 1, xlNo
Application.ScreenUpdating = True
End Sub
 
Upvote 0
All I am doing is looking who has a zero next to their name and typing their name in another column in a list format.
Try this, copied down after adjusting the ranges to match your data.


Book1
ABCD
1NameOrders PlacedZero Orders
2Justin2Fred
3Bob3Mary
4Fred0
5Sally1
6Mary0
Zero Orders
Cell Formulas
RangeFormula
D2=IFERROR(INDEX(A$2:A$6,AGGREGATE(15,6,(ROW(A$2:A$6)-ROW(A$2)+1)/(B$2:B$6=0),ROWS(D$2:D2))),"")
 
Upvote 0

Forum statistics

Threads
1,216,051
Messages
6,128,503
Members
449,455
Latest member
jesski

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?

Disable AdBlock

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
Back
Top