PowerPoint VBA - For Loop和Array

I am trying to replicate the below code with arrays, to avoid repeating the code 6 times. The code colours two boxes based on the value of one, in this case TueCum and TuePer - I also have WedCum, WedPer etc.I am trying to replicate the below code with ar