Import field from Excel to Powerpoint

[xgravity23]

I'm helping a non-profit with a silent auction and we'd like to display a PPT presentation at the end of the auction that scrolls through, displaying (1) the items (2) winning bidder (3) winning bid amount.



I think the easiest and quickest way to do this would be to set up a one-slide template with placeholders, then import all the data (once it has been entered) from Excel, filling the placeholders and generating enough slides to contain all the data. Is there a way to do this? Or will I have to manually enter all the winning bidder numbers/amounts? Please say no to that last question.

[macropod]

Hi xgravity,

See: http://peltiertech.com/Excel/XL_PPT.html

You might also find this site useful: http://www.pptfaq.com/index.html

[xgravity23]

I can't find anything on those sites that addresses my particular need. I found this page ( http://www.pptfaq.com/FAQ00593.htm ) which is close, but it doesn't embed the Excel data directly in the text of the PPT slide; it creates a sort of text box that doesn't flow with the surrounding text, and I'll need the data from Excel to become the text. That data is my content.

Any other help?

[macropod]

Hi xgravity,

You're not likely to find a website with something tailored precisely to your needs. Whatver you find will need to be adapted. For example, the following code is based on the 'Paste a Selected Excel Worksheet Range into the Active PowerPoint Slide' example from the first link I gave you. For the most part, the code is the same - I've tossed out a few extraneous bits and made the code update the 1st textbox on the active slide, but that's all:

Sub ExcelVal2PwrPt()
' Set a VBE reference to Microsoft PowerPoint Object Library
Dim PPApp As PowerPoint.Application
Dim PPPres As PowerPoint.Presentation
Dim PPSlide As PowerPoint.Slide
' Reference existing instance of PowerPoint
Set PPApp = GetObject(, "Powerpoint.Application")
' Reference active presentation
Set PPPres = PPApp.ActivePresentation
PPApp.ActiveWindow.ViewType = ppViewSlide
' Reference active slide
Set PPSlide = PPPres.Slides(PPApp.ActiveWindow.Selection.SlideRange.SlideIndex)
' put the Excel Cell's value into the 1st textbox on the slide
PPSlide.Shapes(1).TextFrame.TextRange.Text = ActiveSheet.Range("A1").Value
' Clean up
Set PPSlide = Nothing: Set PPPres = Nothing: Set PPApp = Nothing
End Sub

[Jamal NUMAN]

Originally Posted by macropod

Hi xgravity,

You're not likely to find a website with something tailored precisely to your needs. Whatver you find will need to be adapted. For example, the following code is based on the 'Paste a Selected Excel Worksheet Range into the Active PowerPoint Slide' example from the first link I gave you. For the most part, the code is the same - I've tossed out a few extraneous bits and made the code update the 1st textbox on the active slide, but that's all:

Sub ExcelVal2PwrPt()
' Set a VBE reference to Microsoft PowerPoint Object Library
Dim PPApp As PowerPoint.Application
Dim PPPres As PowerPoint.Presentation
Dim PPSlide As PowerPoint.Slide
' Reference existing instance of PowerPoint
Set PPApp = GetObject(, "Powerpoint.Application")
' Reference active presentation
Set PPPres = PPApp.ActivePresentation
PPApp.ActiveWindow.ViewType = ppViewSlide
' Reference active slide
Set PPSlide = PPPres.Slides(PPApp.ActiveWindow.Selection.SlideRange.SlideIndex)
' put the Excel Cell's value into the 1st textbox on the slide
PPSlide.Shapes(1).TextFrame.TextRange.Text = ActiveSheet.Range("A1").Value
' Clean up
Set PPSlide = Nothing: Set PPPres = Nothing: Set PPApp = Nothing
End Sub

Hi Paul,

Do we still miss a convenient tool even in the office 2013 that can make the mail merge easy in the PowerPoint and works the same way as in the Word?

I couldn’t know how the code that you have supplied may work as a tool to import data from Excel to PowerPoint. Could you please elaborate more?

Many thanks

Jamal

[macropod]

I don't have Office 2013 yet, so I can't say for sure. However, I think it most unlikely that MS is going to add a mailmerge function to PowerPoint.

As for your second question, have you tried the code? It runs from Excel.

[Jamal NUMAN]

Originally Posted by macropod

I don't have Office 2013 yet, so I can't say for sure. However, I think it most unlikely that MS is going to add a mailmerge function to PowerPoint.

As for your second question, have you tried the code? It runs from Excel.

Thank you Paul for the answer.

I tried to apply the code but couldn’t figure out how it works.

For example, as we link the excel table to Word, we need first to “insert fields” and thus the values in the excel file can be read. But in the case of PowerPoint, how this can be accomplished?



please, have a look on the attached images

[macropod]

The macro simply copies whatever is in cell A1 and pastes it into a new PowerPoint presentation on the first slide. If you need something special, please start a thread for that.

[Jamal NUMAN]

Originally Posted by macropod

The macro simply copies whatever is in cell A1 and pastes it into a new PowerPoint presentation on the first slide. If you need something special, please start a thread for that.

Ok. Thanks.

Jamal