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.
|