View Single Post
 
Old 10-11-2018, 01:46 PM
p45cal's Avatar
p45cal p45cal is offline Windows 10 Office 2016
Expert
 
Join Date: Apr 2014
Posts: 863
p45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant futurep45cal has a brilliant future
Default

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
File Type: xlsm msofficeforums40597Form 1.xlsm (43.9 KB, 18 views)
Reply With Quote