rows 'I'm storing my data in a special collection, you will need to adapt this I'm assuming that you know which page you want to update at each row, so: For Each dr In. x, (2) '2 is the index of the template I wish to use (in master views, the index is the order they're in (starting from 1) I then add all the pages I'll need, (this can vary depending on your application, and the number of rows, and whether you do this at the start, or in the process, will depend on whether you have mapped which page you should put the data onto, in your data) For x = 1 To NumberOfPages MyPPT.ApplyTemplate ('Your template here.potx') Set ppt = CreateObject('PowerPoint.Application') I'm not going to go over the basics of looping etc, but go over the key code peices.ġ) Open and gain control of powerpoint from excel. These are your reference points for where you want stuff to go. This is a quick and dirty piece of code that puts the index & name of each item on your template page, into the shape itself. Then run the following powerpoint macro, so that you can get the name and index/id for every shape on the page. My first recommendation, is to create a powerpoint template using master views, with placeholders and titles all ready to go.
This is definately possible, and quite fun :-)
