Opgelost check dubbele naam

[Egbert12345]

Dat snap ik en ik probeer het nog een keer. Misschien ben ik naief, maar ik meende dat het niet zo ingewikkeld moest zijn. Zie s.v.p. mijn voorbeeldbestand.

 

[peter59]

Oké, als je nu ook nog in het voorbeeld aangeeft wat er met de rode cellen moet gebeuren, bijvoorbeeld het tellen van het aantal rode cellen, of wat je precies in gedachten hebt?
Of misschien een ander ontwerp? Bijvoorbeeld een tabel? Of? Of? Of?
Uit welk bronmateriaal zijn de gegevens in het voorbeeld afkomstig?

 

[Egbert12345]

Ik zag dat in mijn voorbeeld twee macro's staan. Onderstaand wil ik gebruiken.

Sub test()

For A = 2 To 23
If Cells(A, 2).Interior.Color = 255 Then Cells(A, 2).Select: MsgBox "gevonden"
Next

End Sub

Bericht automatisch samengevoegd: Gisteren om 13:53

Hallo Peter, ik wil graag dat alleen er wordt gemeld dat die rode cel is gevonden en de betreffende cel wordt benoemd, daarna vul ik die macro wel aan,

 

[peter59]

Maar een rode cel???
Kijk eens of dit in de buurt komt?
Of anders zul je toch verder dienen te borduren met de voorzet #4 van @emields.

 

[Egbert12345]

bedankt