PowerPoint VBA Search and replace gradient fills - repost

Simple VBA script required that will find all gradient fills used in a PPT (PowerPoint 2003 used here) and replace the gradient with a simple single solid colour fill approximately the mid tone of the gradient. Also assitance with adding this as a ToolBar item so it can be applied quickly to several PPT's This is an initial simple project, with several other 'PPT' replacement and tweaking tools required in the next few months, for use internally. ## Deliverables 1) Complete and fully-functional working VBA as part of a demostration PPT's and seperate complete source code of all work done. 2) Must not require an install or be dependant on any 3rd party library, purely VBA to run in PowerPoint. 3) All deliverables will be considered "work made for hire" under U.S. Copyright law. Buyer will receive exclusive and complete copyrights to all work purchased. (No GPL, GNU, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site per the coder's Seller Legal Agreement). ## Platform Windows PC XP PowerPoint 2003