powerpoint

问题 In Word, there is an option to compare two documents and find out the differences between the two documents. I'm looking for a similar function to compare two Powerpoint documents. Ideally, it would list the individual slides that are different, the differences in each slide between the versions and when the changes were made. However, I can't find a menu option for this functionality (I'm using Office 2007). Am I missing something? If this functionality is not in Powerpoint, are there 3rd

问题 I have about 15 different slide decks, that contain 3-4 slides each. Each deck is comprised of "certificates" to be broken out and given to each individual recipient, who is named on the certificate. This process is repeated every month. ideally, I would like to enable a VBA script to extract each sheet to save as (or print as) a PDF, and save the file with the name of the recipient named on the slide... is this possible? The best I have found is this code, (which doesn't work on my mac, but

问题 Issue Description : To generate a graph on a slide. In PowerPoint on Macintosh shapes.addchart or shapes.addchart2 methods are not defined. Solution Tried : Generate chart dynamically on embedded Excel then paste it on slide. It is giving out of memory error. Expected Resolution : An alternative to shapes.addchart method or some other work around to achieve the target. Windows OS: Windows 10 Pro Version 1607 (OS Build 14393.693) Office: Microsoft Office 365 ProPlus, Version 1611 (Build 7571

问题 Issue Description : To generate a graph on a slide. In PowerPoint on Macintosh shapes.addchart or shapes.addchart2 methods are not defined. Solution Tried : Generate chart dynamically on embedded Excel then paste it on slide. It is giving out of memory error. Expected Resolution : An alternative to shapes.addchart method or some other work around to achieve the target. Windows OS: Windows 10 Pro Version 1607 (OS Build 14393.693) Office: Microsoft Office 365 ProPlus, Version 1611 (Build 7571

问题 I am looking for a completely lossless way of converting Excel and PowerPoint documents to PDF. I am using this script for Word and it works flawlessly https://gallery.technet.microsoft.com/office/Script-to-convert-Word-08c5154b. I am looking for a similar script for Excel and PowerPoint and cant find one on the internet. I dont have much experience with VB at all so I am confused where it specifies which office application to use. Is there anyone that can provide one for Excel and PowerPoint

问题 I am currently trying to do a replace all on the object name in PowerPoint. Normally each content object is named Content Placeholder #, I have already named each object something like "PptBobChart1, PptBobScatter1", and now I need to do a replace all to change each of the object names into "PptTomChart1, PptTomScatter1". I know I can go into the selection pane one at a time to manually change it, but is there a way to do the whole thing in VBA? 回答1: You could try something like: Sub

问题 First, open a new PowerPoint and Excel Document, then click on the first(or any) cell in the Excel document until the text cursor is visible, switch back to PowerPoint and run the following VBA code(Assuming you have at least one blank slide already present): ActivePresentation.slides(1).Shapes.AddOLEObject 30, 30, 100, 100, "Excel.Sheet" I receive the following error(on multiple systems): -2147467259 Method 'AddOLEObject' of object 'Shapes' failed If you close the separate Excel window, the

问题 I know that this question probably was asked x1000 times, but I've been struggling for the past 3 hours to covert pptx to pdf via excel vba (this is required for my report generator, and in order to keep layout clean ad tidy I've decided to use PowerPoint, because word constantly mess things up). Here's the code I'm using: Dim ppt As Object On Error Resume Next Set ppt = GetObject(, "PowerPoint.Application") If ppt Is Nothing Then Set ppt = CreateObject("PowerPoint.Application") End If On

问题 I have a powerpoint presentation with hidden slides. I want to number only the visible slides. I got this code : Sub Numerotation() Dim x As Integer Dim diapo As Slide For Each diapo In ActivePresentation.Slides If diapo.SlideShowTransition.Hidden = False Then x = x + 1 diapo.HeadersFooters.Footer.Text = x Else diapo.HeadersFooters.Footer.Text = "" End If Next End Sub I got this error : Execution Error : '-2147188160 (80048240)': HeaderFooter (unknown member) : Invalid request I don't

问题 I have a powerpoint presentation with hidden slides. I want to number only the visible slides. I got this code : Sub Numerotation() Dim x As Integer Dim diapo As Slide For Each diapo In ActivePresentation.Slides If diapo.SlideShowTransition.Hidden = False Then x = x + 1 diapo.HeadersFooters.Footer.Text = x Else diapo.HeadersFooters.Footer.Text = "" End If Next End Sub I got this error : Execution Error : '-2147188160 (80048240)': HeaderFooter (unknown member) : Invalid request I don't