showing percent complete pictorially in powerpoint

[maxpirate]

From Access Vba how can i show percent complete as a rectangle with color filled upto the percent in the powerpoint slide