I played with conditional formatting and couldn't make it work, so…

In the attached, a button in the vicinity of cell AL10.
Triangles are removed then added.
The first letter of a cell represents the morning.
Any letters after that represent the afternoon.
If you want to signify only tardy in the afternoon, then start the cell with, say, a space (or more than one space(or any other character)),then enter a t character.
The same for absent, but use an x.

For demonstration, an oddity in cell J25. How would you or I interpret it?

Currently all the triangles are at 50% transparency so that you can check the triangles versus the cell content behind being visible. To get rid of the transparency, disable/delete the code line myshape.Fill.Transparency = 0.5.


There's a couple more lines of code to delete later,left there for demonstration purposes, they are:
Application.ScreenUpdating = True'delete this line later.
MsgBox "Triangles removed" 'delete this line later.

Attached Files

msofficeforums40597Form 1.xlsm (43.9 KB, 20 views)