delete some rows based on the data

[ccs1981]

hi all..


i attach Book1.xls to explain what i want to do.

at the sheet 1, "input", is is the original example data before run the marco.
at the sheet 2, "explain output", is is explaination for the marco.
at the sheet 3, "output", is the output i want

please assist. thanks

[Hung]

I would approach it like this;
Merge textstrings in column one and two, but separate the strings with a recognisable sign, like ";"
Then count the occurence of the resulting textstrings line by line. Delete those that have count higher than 1.

After that works, the "remark" column needs to be merged, based on the value of the "Favorite Fruit" column (For each.. If..Then..Else..End If...Next).
Stringmerging can be done like this;

Sub GlueStrings()
Dim strTitle As String
Dim strFirstName As String
Dim strLastName As String

strTitle = "Sir"
strFirstName = "Ronald"
strLastName = "McDonald"

Dim strSalutation As String

strSalutation = strTitle & " " & strFirstName & " " & strLastName
MsgBox (strSalutation)
End Sub

Cutting the value in column "Remark" and adding the string to "Favorite Fruit" column goes the same way.

[ccs1981]

hi.. hv any better solutions? please help.. thanks..

[ccs1981]

any idea? i am lack of solutions