Hi Stuart. this may help you. Sub DuplicateRed() 'color cells in red for duplicates in selected range Application.ScreenUpdating = False Rng = Selection.Rows.Count For i = Rng To 1 Step -1 myCheck = ActiveCell ActiveCell.Offset(1, 0).Select For j = 1 To i If ActiveCell = myCheck Then Selection.Font.Bold = True Selection.Font.ColorIndex = 3 End If ActiveCell.Offset(1, 0).Select Next j ActiveCell.Offset(-i, 0).Select Next i Application.ScreenUpdating = True End Sub
On Wed, Feb 11, 2009 at 2:44 AM, stuartjohnw...@googlemail.com < stuartjohnw...@googlemail.com> wrote: > > Hope you can help. In column B2:B265 I have a list of names, each > name appears about 4 time each. In column H2:H265 there is a list > containing either "PC", "Laptop" or "CAD" corresponding to what type > of computer each individual in column A is using. I'm looking for a > formula or series of formulas that will tell me how many PC's, > laptops's and CAD's are being used but only counting one per name once > (hope that makes sense)." > > > > -- Hari kumar --~--~---------~--~----~------------~-------~--~----~ Visit the blog to download Excel tutorials at http://www.excel-macros.blogspot.com To post to this group, send email to excel-macros@googlegroups.com For more options, visit this group at http://groups.google.com/group/excel-macros?hl=en Visit & Join Our Orkut Community at http://www.orkut.com/Community.aspx?cmm=22913620 To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com To see the Daily Excel Tips, Go to: http://exceldailytip.blogspot.com If you find any spam message in the group, please send an email to Ayush @ jainayus...@gmail.com -~----------~----~----~----~------~----~------~--~---