If function based on color of the shape

[mjoll]

Short description:

I need to do little project on VBA and this is what I've come up: a car does laps based on number of laps user entered. But there is also a traffic light,
and if the traffic light is green, it does a normal lap, but if it's red, it has to do the bigger one. Problem is that I have no clue how to read the color value from a shape.

I will also add my file so you can take a look: Sheet2Problem.xlsm

For example:
if shape("light").color=green then
do
car_1.incrementleft speed + rnd()*10
paus 0.04
loop until car_1.left > line_5.left
or something like that.