macro to comment on cells based on formula's (duplicate, length, no entry)

[basil.licop]

Hi All,

I need help making a macro that will scan for duplicates, length & empty cells.

I have the sample file below that does conditional formatting but it doesnt help as much because I want to show the reason for the highlight's on a comment instead.

sample file : http://www.mediafire.com/?sharekey=2b838b5f12f1d82cd8f14848abf485dde04e75f6e8ebb871

file that might help out: http://filedb.experts-exchange.com/incoming/2008/12_w51/86630/duplicate-finder-03.xls

checks would be:
column A - duplicates and/or length should not be over 100 characters
column B - duplicates
column F - should only contain 2 comma's(or 3 keywords)
all columns - check if no entries are found(empty cells)

Please help! I'm very noobish when it comes to macro's.

Thank you very much!

 

[basil.licop]

one last thing, if i wanted to check both duplicate and length over 100 characters for column A - how would I do it?

i mean add both comments to 1 cell if it finds a duplicate & over 100 char limit.

 

[PCL]

Change code for LENGTH > 100 by

'-----    LENGTH  >  100   --------
        If (Len(MYCELL) > 100) Then
'--      A  ALREADY  PREPARED  FROM  PREVIOUS  TEST
            If (A > 1) Then
                With Cells(MYCELL.Row, MYCELL.Column)
                    .ClearComments
                    .AddComment
                    .Comment.Visible = False
                    .Comment.Text Text:="Length  >  100  AND   Duplicate"""
                End With
            Else
                With Cells(MYCELL.Row, MYCELL.Column)
                    .ClearComments
                    .AddComment
                    .Comment.Visible = False
                    .Comment.Text Text:="Length  >  100"
                End With
            End If
        End If

You should be closed to be ready to pepare your own code now

 

[basil.licop]

yes now I understand it a bit

thanks for all your help!