Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




Excel-powerpoint


Is it possible to open a powerpoint show/presentation from excel?
I want to be able to open the show as part of a help file, if the user presses a button.




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Excel 2000, Create Powerpoint Org Chart From Excel.
I want to create a powerpoint org chart from Excel using information held in Excel. I have found how to add an Org chart into Powerpoint but can't find anywhere that tells you how to change the details/options or add Subordinates Managers etc and alter those details.

Anyone have any ideas (I don't want to create seperate text boxes if possible.)

Ps if you can create a good powerpoint org chart from excel, any ideas on the best layout of information in the spreadsheet to work through and create it.

This is one of those, that would be good if you can do it (created them in the past and are time consuming pains), rather than has to be done last week ideas.

Regards.

rob.

Excel To Powerpoint
I'm trying to take Excel data and put it into a powerpoint chart(graph) datasheet slide? How do I do this

For example: I want to take a list of numbers in excel spreadsheet and one by one put those values in a bar graph in a powerpoint slide. I want to put those values in a powerpoint datasheet. From those values you get a nice bar graph.

Thanks

Powerpoint In Excel
Does anyone know if it's possible, using VB, to display a powerpoint presentation within Excel - ideally within a user form. Can't seem to insert it within the form.

Alternatively, displaying it somewhere within the current WSheet would also be as useful.

Thanks
Chris

Powerpoint PPs From Excel ????
I need to open a powerpint pps file from an application in Excel, I tried using the following:

Dim ppApp As PowerPoint.Application
Dim prsPres As PowerPoint.Presentation

Set ppApp = New PowerPoint.Application
Set prsPres = ppApp.Presentations.Open(ActiveWorkbook.Path & "Distingos.pps")

But, then I realize that this code works only with Office XP, because the Office that we use is 2000 and an error is diplayed:

Compile Error

User Defined type not defined

I need help, does anybody knows how to make it work?, did I need a class module?

Excel/Powerpoint
Hi

I'm making a VBA thing which is supposed to:

paste data from several Excel workboooks into one central workbook with about 70 worksheets.

Each sheet contains an embedded graph which is linked to the pasted data.

That's the easy bit.

What I need to do now is to copy each of the graphs into a Powerpoint presentation, one graph per slide.

So,I've got code that in Excel goes to sheet 1, copies the graph, starts a new Powerpoint session, opens the PPT, goes to the correct slide, pastes the graph, then saves and closes Powerpoint, leaving Excel as the active window. Then the next sheet is selected and the process is repeated What I want to be able to do is to return to Excel, go to the next sheet etc, without having to close Powerpoint after each paste.

Can anyone advise?

Thanx

Excel To Powerpoint
Greetings y'all
Does anyone know of a way to update a chart and install it on a powerpoint slide programmatically?
I have created the charts, but the data (which comes form an external source) must be updated often. No problems there wrote code to get that done. Maybe not the most efficient code, but it works. Once the data is updated on the charts I need to be able to update the Powerpoint slide.
The big issue is the charts are one time things and the same spreadsheet is used to create all the new charts.
Would a work-around for that be creating a "buffer" spreadsheet and updating the data there. From there if the chart were linked into Powerpoint you could just refresh with the new data.
If that is the case, all I have to do is reference the buffer worksheet, findo out if the chart name exists already and overwrite or create. Then refresh or create Powerpoint slide.
Confused yet? The above brings me to my next question: Can you update a workbook even though it is not openned? If so how?
I appreciate any crazy ideas that may help.

MS Excel -> MS PowerPoint?
I've been trying to open a ppt file from Excel with little luck, too many error msgs! Is it possible or is it quicker and easier to go through MS Access.

I've been using code similar to:-

Dim channelNumber As Integer
channelNumber = Application.DDEInitiate("powerpnt", "H:homepowerpointpptTest1.ppt")


But it produces a type mismatch error and then a run-time error - object-defined error

Cheers
Fossil

Driving PowerPoint From Within Excel Using Excel VBA.
Hi Everybody

As we all know that we can drive one MS Office application from another, for example we can drive MS Access from within MS Excel and vice versa, what I want to know is that is it possible to drive MS PowerPoint from within Excel using Excel VBA?

I want to be able to insert graphs as pictures in to PowerPoint presentations from MS Excel (the graphs actually get created in an Excel spreadsheet and needs to be brought in to PowerPoint for a presentation - there are about 150+ of these pictures and this process needs to be repeated every month).

So I was wondering if I could automate the process of bringing in these pictures from Excel in to Powerpoint using VBA. If yes,, that would save us a lot of time and effort.

Can someone point me to wherever I can find some information to drive PowerPoint from within Excel using Excel VBA to carry out the above task?


Best regards


Deepak Agarwal

Pasting From Excel To Powerpoint
I want to copy an image from Excel and paste into a slide in Powerpoint. I can't seem to figure out how to do this. I then want to go back to Excel, copy some more information and paste this into the next slide and so on... any ideas please??? thanks

So to reiterate I need a macro created in Excel that runs code to copy something and paste into a given slide in Powerpoint.

Closing Powerpoint From Excel
Hi. I'm updating a PPT presentation using data in an Excel workbook (Office versions 2002). I'm manipulating the powerpoint objects (using an Excel Macro) that are set as:

set ppApp = new.powerpoint.application
ppApp.Presentations.Open (somefile)
Set ppPres = ppApp.ActivePresentation
....

After updating the presentation, I try to close the PPT application so that my Excel control sheet is once again visible:

ppPres.Close
ppApp.Quit
Set ppPres = Nothing
Set ppApp = Nothing

Unfortunately, this doesn't close the PPT window. The PPT window stays in place until I stop execution of the Excel macro. But I need to query the user (with the macro) before ending execution. How can I close the PPT window, or alternately, how can I get the Excel window back on top so that the user can see the msgbox info I'm trying to show them.

Anyone know the secret??
Thanks.
-em

Excel/Powerpoint Interaction
I am currently making changes to an app that I did NOT develop. It is a nightmare. So, I am trying to start everything from scratch. The application is a powerpoint slide show that grabs data from Excel. Simple enough. But, after looking into it, I get stuck.

I can get the data from Excel, but my data changes all the time, but the data in Powerpoint only remembers the data that was pasted into Powerpoint. How do I grab data from a Refreshed Excel spreadsheet??

I’m lost. Please help….

VB To To Open Powerpoint From Excel
Hello All,

New to the site and was hoping for some insight.

I am trying to several things in Excel

1. In Excel(XL), select a range and open a powerpoint(PP) template.
2. within PP, update currect object with the range from XL
3. save the PP based on a cell within XL

Don't know if it's possible or am I asking for too much.

Any help is much appreciated.

Powerpoint/Excel Communication Via VBA
I have a PP presentation with an Excel sheet (not linked) on the last slide. I want the pres and the sheet share data and affect each other.

1) How can I access data of the embedded excel sheet from a VBA script in the presentation?

2) How can I add a new row in the embedded excel sheet, everytime the user adds a new slide to the pres?

3) How can I restrict cell values in the embedded excel sheet to the number of slides in the presentation?

Thanks in advance.


Robert

Excel Object In Powerpoint
Hi,

I posted this in the incorrect forum, so im reposting it here...

I'm trying to select an Excel Object that is in PowerPoint and change one of the cells with Visual Basic (Macro).

I think this is how you select the object:
ActiveWindow.Selection.SlideRange.Shapes("Object 18").Select

And i think this is how you change the cell
 Range("B9").Select
    ActiveCell.FormulaR1C1 = "asdf"


I was thinking of using this code that I got from another post:

Dim xlApp As Excel.Application
Dim xlWorkBook As Excel.Workbook
Dim xlWorkSheet As Excel.Worksheet
' Create an instance of the object
Set xlApp = New Excel.Application
' This determines whether the application is shown or not
xlApp.Visible = False
' Open the appropriate workbook (i.e. XLS file)
Set xlWorkBook =
' Then open the appropriate worksheet
Set xlWorkSheet = xlWorkBook.Worksheets("Days of Care")

 Range("A1").Select
ActiveCell.FormulaR1C1 = "Test"


But I don't know what to set xlWorkBook to.


Any help would be appreciated!!

Thanks!

Excel Object In Powerpoint
Hi,

I'm trying to select an Excel Object that is in PowerPoint and change one of the cells with Visual Basic (Macro).

I think this is how you select the object:
ActiveWindow.Selection.SlideRange.Shapes("Object 18").Select

And i think this is how you change the cell
 Range("B9").Select
    ActiveCell.FormulaR1C1 = "asdf"

Any help would be appreciated!!

Thanks!



Edited by - Fudgenut on 8/12/2003 1:08:24 PM

Excel Powerpoint Automation
Hello everyone,
My final year project, is to create a "Project Mgmt Review" automation tool. Every month, the company I am working for asseses it's monthly performance's in the form of 14 spread sheets which it in turn incorporates into a 20 slide powerpoint. So at the end of every month, the values in the excel spreadsheet changes,which in turn has to be incorporated into the powerpoint PMR. Until I create, this software, At the end of every month , someone will have to manually cut,copy , paste and replace the old excel sheets in the PMR, with the new one. My project is to automate this entire process, with the click of a button.
I would have to generate a mechanism,whereby I can access the Excel spreadsheets using vb, an incorporate them into powerpoint. I would like you guys, to help me out whether , this can be done using API'S or using .ocx files. I would also like to know, if this project is feasible using powerpoint in the first place. If it's not too much of a hassle , I would like someone to start me off, by giving me the brief algorithm, and some introductory code.
Please guys, I am in dire straits, and as you would have figured out by now, My knowledge of Visual basic is rather limited. I have till the end of next month, to finish..so someone please help. Thank you.

Creating New Powerpoint Slide Using Excel?
ok.. Im trying to add a new slide to a presentation that has NO slides (from excel) using:


Code:
Set PPT = GetObject(, "PowerPoint.Application")
PPT.ActivePresentation.Slides.Add(1, ppLayoutTitle).SlideIndex

but it does not reconize ppLayoutTitle (SlideFormat). so I tried:


Code:
Set SlideType = PPT.Presentations.Sliderange.Slides(1).Layout
PPT.ActiveWindow.View.GotoSlide Index:=PPT.ActivePresentation.Slides.Add(Index:=1, Layout:=SlideType.ppLayoutTitle).SlideIndex

but no success. Any ideas??

Thanks, JEff

Automate Interface From Excel To Powerpoint
Greetings once again,
I have had extremely good luck getting answers from this forum, I would likt to thank all of the people who have helped and with that in mind I seek your assistance again.
I have created a spreadsheet that extracts, loads/refreshes data, sorts the data and creates pie charts based on the results. From teh direction I recieved from my bosses, I thought that was the end of it.
Well as luck would have it, the end result changed and while all of my works was worthwhile, they have changed the requirement for viewing. Now it must be able to be viewed in a powerpoint presentation.
I have tried linking the chart in the presentation, but the problem with that is, every chart updates everytime the spreadheet is updated. So if I run the sort through one set of data, link the chart then run another set of data, both charts update. I need each chart to stay static for each set of data.
I think the easiest thing to do would be to export as a picture and insert into the Powerpoint on the approriate slide in the correct position at the correct size.
Is there a way to do that progammatically, or is there a native function in Office 2000 that would allow me to do that? Any help would be greatly appreciated.

p.s. in a listbox with multiple columns howdo I reference the unbound column. If I want to use that value for something I have been binding that column then rebinding at the end of the macro to keep the value constant it works but just not as effiicient as it could be.

Slow Excel Automation From PowerPoint
Wonderful web site, hope one of you can help…

I have a VBA macro which operates on an existing excel workbook. In my application I would like to launch this macro from a PowerPoint macro since the resulting excel output provides content for a PowerPoint slide and the PowerPoint side already has VBA code associated with it. The problem is that, when I run the code as a PowerPoint macro referencing an Excel workbook object it runs 30 times slower than when I run the same macro under excel directly. I figured that this must be due to some sort of extreme overhead in referencing excel objects across applications and this does seem to be the case. The problem is that if I include the macros as part of the excel sheet which I reference the user is bothered by a bunch of warnings about opening a file containing macros. Any easy way around this?

Thanks
Paul Voith

Excel/PowerPoint Border Problem..
hey guys....i am pasting a link into power point which contains a cell from excel... the cell has objects in it, such as arrows... when i paste into excel the cell border shows up in powerpoint. and i can't simply fill the cell in with white, because i have a background setup in power point... and i am unable to just copy the object because power point won't let you paste a link with just an object, it has to be linked to cells...any ideas???



something else i just noticed.... when i first paste the link into power point the border does NOT show up....however, when the cell is updated (arrows change directions, shapes change) and power point is updated with the new cell info, thats when the stupid border shows up!!

Export Charts From Excel Into PowerPoint
Hi everyone, I need to export a chart from Excel into PowerPoint on multiple slides.  I got this code to work!  The problem is that I want it to place the charts on lets say slides 1, 3, and 5.  Right now the code places the chart in sequencial order.  I was thinking for the if statement to place a statement like the:

'If slideindex = 1 or slideindex = 3 or slideindex = 5 Then'

Please help!

Sub TestNew()

Dim objPPT As Object
Dim objPrs As Object
Dim shtTemp As Worksheet
Dim chtTemp As ChartObject
Dim intSlide As Integer
     
Set objPPT = CreateObject("Powerpoint.application")
objPPT.Visible = True
objPPT.presentations.Open ThisWorkbook.Path & "TestPP.ppt"
     
For Each shtTemp In ThisWorkbook.Worksheets
      For Each chtTemp In shtTemp.ChartObjects
      intSlide = intSlide + 1
      chtTemp.CopyPicture
      If intSlide > objPPT.presentations(1).Slides.Count Then     'I think this if statement needs to be changed
          objPPT.ActiveWindow.View.GotoSlide Index:=objPPT.presentations(1).Slides.Add(Index:=intSlide, Layout:=1).slideindex
       Else
          objPPT.ActiveWindow.View.GotoSlide intSlide
       End If
       objPPT.ActiveWindow.View.Paste      'This may have to be moved if the if statement is changed
   Next
Next
    
Set objPrs = Nothing
Set objPPT = Nothing

End Sub


Thanks in advanced!

Import Excel Graph To Powerpoint
Hi,


I have a graph in Excel. I have a vbscript which opens a pointpoint presentation. I am trying to copy the graph from Excel into one of the slides in PPT.

I receive the error Object does not support ... 'oPPTPres.Paste'

where

    Set oPPTApp = CreateObject("PowerPoint.Application")
     
    oPPTApp.Visible = True
    Set oPPTPres = oPPTApp.Presentations.Open(sPresentationFile)

and



            cht.Select ' from Excel workbook objWbook and objSheet

            cht.Copy

            oPPTPres.Paste
    
                Next


I would be very grateful for any help.

Thanks

Danielle

Urgent Copy Charts From Excel To Powerpoint
Hi all!!

I hope there is someone who can help me, I really need to finish this work as soon as posible...

I have an Excel file containing some charts...
I need to do a macro to copy these charts into a powerpoint file

I have tried the following code but it does not work
Please, can you help me?
Many thanks in advance

Using Excel Data To Create Charts In PowerPoint
Is there a way to take values located in Excel and use these values to create a Powerpoint chart?

For example, assume that I have the following info in Excel:
cell B1: 1st Quarter
cell C1: 2nd Quarter
cell A2: AOL
cell A3: MSFT
cell B2: 25
cell C2: 30
cell B3: 10
cell C3: 5

Is there a way to take this information and use it to create a chart in Powerpoint?

If someone knows how to do this, would you please post sample code?

Change Links In PowerPoint - MSGraph - Excel
Hello! I have a embedded MSGraph object in a PowerPoint slide, linked with a Excel worksheet. I want change the link to a new source Excel file.

Can someone help me?

Thanks in advance.

Greetings, César González.

PD:

The msoLinkedOLEObject has the property '.LinkFormat.SourceFullName',
I am looking for the equivalent property of the 'msoEmbeddedOLEObject'

Linking Powerpoint With Excel With Moving Files
Hi,

Im trying to create a powerpoint presentation that links to an excel file. Currently my macro works with the syntax:

Set xlWrkBook = xlApp.Workbooks.Open("H:Officeook2")

as my Powerpoint presentation is also saved in the H:Office folder.

I would like to somehow set the file destination in such a way that these 2 files can be linked even if I move them, but as long as they stay in the same folder. Such that if I moved this "Office" folder to my C: drive, I wouldnt have to change any code.

Any help would be greatly appreciated. Thanks

Export Excel Cells To PowerPoint Slide
I have a list of names and addresses set up in Excel. I need to be able to export a name and address to a text box on a PowerPoint slide that is already created. The PowerPoint slide is a mailing label that will be printed after being merged from Excel. I will be doing a loop to export each of these addresses individually to separate slides (copies of each other). Please help me out on the process of going between Excel and PowerPoint...I'm good on everything else. Any help or pointing me toward help will be appreciated. Thanks.

Extract Data From PowerPoint And Input It Into Excel?
Would it be possible to do this?

There are several strings that I need to extract from several presentations. I have the code to open PP from Excel VBA, would it now be possible find specific strings, copy them, then place them into specific cells? COuld this be done with VBA, or will I have to use VB to do this? What would you say the difficulty of this project is?

Thank you

--edit--

Would it be possible to just extract the strings from powerpoint into a database using VBA in PP?

File Signature Of Word/excel/powerpoint
Does anyone know how to deal with the file signature of word/excel/powerpoint?

They all have a common signature of D0 CF 11 E0 A1 B1 1A E1 but I want to find out who's who among them.

How To Paste Charts From Excel To Powerpoint Slides
Hi
I have an Excel sheet in which there are some charts. I want to copy each of these charts and paste them on a separate slide in a powerpoint presentation through VB. How do I do that. Can anyone help me out

Powerpoint/Excel VBA Stuff ***KINDA RESOLVED***
Im asking this on someones behalf so apologies if the details are a little sketchy!

VB Code:
' ppt is a powerpoint application'go to slide 2 ppt.ActiveWindow.View.GotoSlide Index:=2 'change the data in the graph data sheet to the data in the excel spreadsheet With ppt.Presentations(1).Slides(2).Shapes(2).OLEFormat.Object.Application.datasheet    .Range("a0") = Range("d18").Value    .Range("b0") = Range("e18").Value    .Range("c0") = Range("f18").Value end with

Basically, a powerpoint chart is modified using values in an Excel spreadsheet, and then closed and saved.

When you re-open the presentation, the chart looks as it should. However, if you double click the chart to see the datasheet, the data reverts back to what it was before it was modified using VBA.

Example attached

If anyone could shed any light on this, I would be very grateful.
Thanks.

Converting Objects In PowerPoint Using Excel **Resolved**
Does anyone know how to convert an Excel object into a picture in Power point?

I know you can copy the chart and then pastespecial as a picture, but when I record a macro to see how this works it doesn't tell me what code it's using to paste.

Is there any command to do this directly or do you know the command to pastespecial as a picture?

Thanks

Flustor

RESOVED: Opening A PowerPoint Document From Excel
How do I open an existing PowerPoint presentation from Excel?

I have tried:

Dim test As Object
Set test = GetObject("C:My Documents est.ppt")

But I don't know what to do with the Object "test"

NB: I have tried to open a new presentation from Excel VB, but I get the following message:
"ActiveX component can't create object"

What references do I need to pull in to make this work?

Thanks,
jeffers



Edited by - jeffers on 12/9/2004 7:32:32 AM

Keep Powerpoint-excel Link Updated While Presentation Is Running
Hi all,

I'm a newbie to this forum, so forgive upfront for any improperly posed question if so....

I've got a Powerpoint presentation which runs in a 'kiosk' like setting so it's showing 24/7.

In the presentation I did a paste-special from a few excel data, which are only updated 'on the fly' in design view of the presentation, however, not when the presentation is actually running.

Would it be possible to have for example some kind of 'refresh data from excel routine' on a first slide that would refresh the linked excel data if there are any changes in the source excel file?

If so, if anyone could point me in the proper direction of thinking/reading i'd be very thankful.

Tonco

Using Excel Chart Event Procedures When Embedded In PowerPoint
Hi,

Say I've declared a procedure in Excel, with a chart on a seperate sheet, that msgboxes what the value of the series is when you mouseover it, something like this:

>>



Private Sub Chart_MouseMove(ByVal Button As Long, _
ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
Dim IDNum As Long
Dim a As Long
Dim b As Long

ActiveChart.GetChartElement X, Y, IDNum, a, b
msgbox IDNum
end sub



>>>.


If I paste this chart into Powerpoint I have not found an easy way to access this prcoedure. I know you can set ActionSettings and I suppose you could call another sub that is given a reference to the shape.oleformat.object, but this seems far too hard.

Any thoughts?

Thanks alot,

Greg

Delete Powerpoint Slides Through Excel VB Macro (with Condition)
I was wondering if someone can help me with this problem.

After my presentation slides are created, I want to delete specific specific slides that do not have a Graph image. My excel macros export graph images to certain templates in my ppt slides. However, if this graph image is not on the template at all, I just want to delete the slide from the presentation.

So far (havent tested or anything, just logic, probably poor since im inexperienced)

Sub DeleteSlides()

Dim Pre As Presentation
Dim Sld as Slide
i As Integer
'Graph As Object ????

i = 50

Set Pre = ActivePresentation 'OR Sld = ActivePresentation.Slides(i)

For i = 50 to 55

If ActivePresentation.Slides(i).HasGraph = False Then
Set Sld = Pre.Slides.Delete(Index: = i) 'OR Sld.Delete

End If

End Sub



If anyone can offer some input for my problem, this would be greatly appreciated.

Keep in touch.

Thank you.

Launching PowerPoint Slideshow From Excel In A Small Window
I haven't opened a PowerPoint slideshow from Excel in years (Excel 8), but I used to use the following code. Now, the slideshow seems to opens for a split second and then close (Excel 10 and 11). Could someone tell me what I am missing? Many thanks in advance.

Code:
Option Explicit

Private pptRunning As Boolean
Private pptObj As PowerPoint.Application
Private pBk As Presentation

Private Declare Function FindWindow Lib "user32" Alias _
"FindWindowA" (ByVal lpClassName As String, _
ByVal lpWindowName As Long) As Long

Private Declare Function SendMessage Lib "user32" Alias _
"SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, _
ByVal wParam As Long, _
ByVal lParam As Long) As Long


Private Sub Run_SlideShow(ByVal pName As String, _
Optional ByVal ssTop As Integer, _
Optional ByVal ssLeft As Integer, _
Optional ByVal ssHeight As Integer, _
Optional ByVal ssWidth As Integer)
'Set defaults.
If IsMissing(ssTop) Then ssTop = 200
If IsMissing(ssLeft) Then ssLeft = 280
If IsMissing(ssHeight) Then ssHeight = 348
If IsMissing(ssWidth) Then ssWidth = 464
On Error Resume Next
'Declare PPT application object.
Set pptObj = GetObject(, "PowerPoint.Application")
If Err.Number <> 0 Then
pptRunning = False
Set pptObj = CreateObject("PowerPoint.Application")
Else
pptRunning = True
End If
'Declare PPT file.
Set pBk = GetObject(pName)
With pBk
With .SlideShowSettings
.StartingSlide = 1
With .Run
.Top = ssTop
.Left = ssLeft
.Height = ssHeight
.Width = ssWidth
.View.AcceleratorsEnabled = False
'Exit Sub
End With
End With
.Saved = True
.Close
End With
'Close PPT if not originally open.
If Not pptRunning Then
pptObj.Quit
End If
Set pptObj = Nothing
End Sub

Create Powerpoint Objects Depending On Excel Data
I want to create rectangles on a powerpoint slide. De size of these rectangles must be read from a excelsheet or txt file. I can creat a reactangle with vb, but don't know how to get the excel data.

P.

Powerpoint Code To Close Excel File Working Incorrectly
Hello,

I am trying to automate a process that runs an access query, transfers the spreadsheet to an excel page, populates charts and graphs, and then uses these charts and graphs with other formatting to create PowerPoint slides.

Although my code seems to work well, when I log off the computer I am prompted to save changes for an "open" excel file, although it doesn't appear to be open. I think this is creating problems with my transferspreadhseet function in Access, because I am getting the error message "Too Many Fields Defined".

Here is a sample of my ppt code:

Set xlApp = CreateObject("Excel.Application")
Set xlWrkBook = xlApp.Workbooks.Open("\Sfa19pmd$ReportingPatient Reporting - TSIPatient Financial ReportingTemplate DatabasesCharts Master template.xls")

' Create a new slide
ActiveWindow.View.GotoSlide Index:=ActivePresentation.Slides.Add(Index:=1, Layout:=ppLayoutTitleOnly).SlideIndex

' Copy picture of the 1st chart object onto the clipboard
xlWrkBook.Worksheets("IP Variance Chart").ChartObjects("IP Variance Chart").Chart.CopyPicture

and so on.... until I reach the end of my code:

' Close the open workbook without saving changes
xlWrkBook.Close (False)
xlApp.Quit

Set xlApp = Nothing
Set xlWrkBook = Nothing

I a wondering if I am opening the Excel file too many times and am missing code that would work better??

Your help is so much appreciated!!
Thanks

Merging/Importing Word, Excel, Powerpoint And Visio Files Into A Word Document
Does anyone know how to do this or know of a website that has source code that does this? I can't find anything anywhere.

Each Page/Worksheet/Slide goes on a seperate page. Print formatting is retained (landscape/portrait) and if the imported Page/Worksheet/Slide is larger than the page im merging/importing to, it should auto-resize to fit the page.

Thx.

Merging Word, Excel, Powerpoint And Visio Files Into A Word Document
Does anyone know how to do this or know of a website that has source code that does this? I can't find anything anywhere.

Thx.

I posted this in VB General but then i saw this forum so I wasn't sure where it belonged and posted in both. Reply to either one.

Webbrowser - Open Links From Excel/powerpoint Within The Same Window (ie Webbrowser)
I am working on a custom browser using the webbrowser control.

When I open powerpoint or excel documents within the webbrowser and when I click on a link in them, I want to open the resulting page in the same window (ie. within the webbrowser control) instead of launching a new instance of default browser. How can do this ?

TIA

"Range" In Excel And Powerpoint
The following script is was I got going in Powerpoint to define the range of my excel spreadsheet where I get tags/values. If I do a change in the spreadsheet (That has nothing to do with the range, as long as I hit the Save button even without a change) and try to run the script again, I get a Runtime Error 1004. If I do the exact same changes in the same PC that I first created the application in, it works fine. What the hell? Please help....

Heres the code (Powerpoint Macro)

Sub GetTags()
' grab the defined data tags from "talker"
Dim rng As Excel.Range, idx As Integer
Set rng = talker.Worksheets(1).Range("DataValues") <----- Error happens right here...
dCount = rng.Rows.Count
For idx = 1 To dCount
dTags(idx) = rng.Cells(idx, 1)
Next idx
End Sub

Powerpoint
Through Excel I have opened up a powerpoint presentation. On the powerpoint presentation, slide 3, I want to insert a graph. Therefore, I can easily insert a chart and a datasheet appears. However, I want the figures from my spreadsheet, say sheet1 to be imported onto the datasheet.

Is there a way of doing this?

Any help would be appreciated.

Help VB+PowerPoint
Hello,
I was trying to put together a slide with a few macros, and I came across a strange problem (I should say that I have never learned to program in VB, and that getting even a small macro to run has been very difficult to me). I put two pictures from the Clip Art in a slide, and redirected the Mouse Over (in the Action Settings of these two pictures) to a macro that I made (very simple one; it just puts three shapes on the screen). I put a large picture as the background of my slide, and redirected the Mouse Over to a 2nd macro that deletes the three shapes. I wanted the three shapes to pop up on the screen whenever the mouse passes over the two small pictures, and to disappear when the mouse moves away. I managed to do it, but a small bug still exists. When I move too quickly between the two small pictures, the first shape created in the first picture is not deleted (as it should because I'm moving the mouse to the 2nd picture). Strangely, I don't have this problem with the 2nd and 3rd shapes (they are always deleted). Can you help me with this problem. I've included the code below.
Thank you.

Sub I_run_this_When_the_mouse_is_over_any_picture_on_the_screen()

Set myDoc = ActivePresentation.Slides(1)
With myDoc.Shapes.AddShape(msoShapeRectangle, ...)
.Name = "shapeA"
End With
With myDoc.Shapes.AddShape(msoShapeRectangle, ...)
.Name = "shapeB"
End With
With myDoc.Shapes.AddShape(msoShapeRectangle, ...)
.Name = "shapeC"
End With

End Sub

------------------------------------------------------------

Sub I_run_this_When_the_mouse_is_over_the_rest_of_the_slide()

ActivePresentation.Slides(1).Shapes("shapeA").Delete
ActivePresentation.Slides(1).Shapes("shapeB").Delete
ActivePresentation.Slides(1).Shapes("shapeC").Delete

End Sub

Powerpoint Help
I've got a project that uses an embedded ppt in an excel file. DOes anybody know site similar to this forum that I may go to for help.

THanks

Powerpoint OLE
can anyone tell me how to start a powerpoint slideshow without having to double click it, instead just clicking a command button

Thanx

VB && Powerpoint??
I would like to get some suggestion and advice on this problem below:

I would like to let the user to select the information(from MySQL) to be inserted into a powerpoint slide.

Let's say...i've created a slides(powerpoint) acts as a employee badge card. In the card, it will contain ID, Name,Department, and Photo. One slides represent one card. Therefore, if the user would like to print more than 1 employee badge card, the slides will increase with the same background but different detail(according to the Employee ID).

Can I do something like MAIL MERGE to display the ID, Name, Department and Photo in Powerpoint?

Powerpoint
Hi

i have the code to open a powerpoint presentation from VB and put it on SlideShow.

VB CODE:
-----------------------------------------------------------------------
Private Sub lbltutorial_Click()

'opens powerpoint presentation and puts it on slide show

Set Appt = New PowerPoint.Application
Appt.Activate
Set Pppt = Appt.Presentations.Open(App.Path & "Tutorial.ppt")


Pppt.SlideShowSettings.Run

End Sub

-----------------------------------------------------------------------
What is the command for closing Powerpoint once the user has finished viewing the Slide Show. ie after the last slide is over.

Thanks a lot!!

Copyright © 2005-08 www.BigResource.com, All rights reserved