Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Create List based on Cell Value
Hello. I'm trying to Scan column C for the word "Yes". If it finds
it, copy the contents of column R of the same row, and create a list in Sheet2 one under the other. Ideally, I would aslo love to have only unique values. Maybe that can be done after the full list is created? Thanks so much!! |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Create List based on Cell Value
One way. This returns unique values and places them in the first
available row in column A of sheet 2. Sub uniqueList() Dim uVal As Collection, u As Variant Set uVal = New Collection For i = 2 To Cells(Rows.Count, 3).End(xlUp).Row If UCase(Cells(i, 3).Text) = "YES" Then On Error Resume Next uVal.Add Cells(i, 18).Text, _ CStr(Cells(i, 18).Text) On Error GoTo 0 End If Next i If uVal.Count = 0 Then Exit Sub With Sheets("Sheet2") For Each u In uVal .Cells(.Rows.Count, 1).End(xlUp) _ .Offset(1, 0).Value = u Next u End With Set uVal = Nothing End Sub Steve wrote: Hello. I'm trying to Scan column C for the word "Yes". If it finds it, copy the contents of column R of the same row, and create a list in Sheet2 one under the other. Ideally, I would aslo love to have only unique values. Maybe that can be done after the full list is created? Thanks so much!! |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
create list based on criteria | Excel Worksheet Functions | |||
How do I create a list based on another list? | Excel Discussion (Misc queries) | |||
Create sorted list based on cell values | Excel Discussion (Misc queries) | |||
How To Create a Value Based Upon The Contents of A List | Excel Worksheet Functions | |||
Create List based on cell data | Excel Discussion (Misc queries) |