Import field from Excel to Powerpoint

xgravity23 · #1 04-26-2011, 04:24 PM

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 · #2 04-27-2011, 12:20 AM

Hi xgravity,

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

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

xgravity23 · #3 04-27-2011, 09:47 AM

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 · #4 04-28-2011, 09:44 PM

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:

Code:

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 · #5 11-21-2012, 03:08 PM

Quote:

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:

Code:

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 · #6 11-21-2012, 03:18 PM

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 · #7 11-22-2012, 11:20 AM

Quote:

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 · #8 11-22-2012, 01:53 PM

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 · #9 11-22-2012, 02:08 PM

Quote:

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

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
import labels from excel	tactical	Mail Merge	3	05-29-2012 04:03 PM
Import excel data in to SQL Server	DavidBrown	Excel	0	08-08-2011 04:49 AM
Import formatted text from Word into PowerPoint	parboy	PowerPoint	0	07-06-2011 08:52 AM
How to Import Notes Field data along with attachments?	Prabhakar	Project	0	04-08-2011 04:46 AM
import tasks from excel with a macro o add-in	milplus	Project	1	03-02-2010 01:25 PM