powerpoint

问题 I've noticed that when you copy a range in excel (copy as a picture - as shown on screen) and paste it into PowerPoint, the resulting image is not scaled 100% to the original image (right click on image, go to format settings and go to size to see scale info). In addition, this scaling differs on different computers (might be related to graphics card). If you have different versions of Office the scaling also differs per computer (i.e. in Office 03, scaling is 100% of original, in Office 07,

问题 I am using a macro in PowerPoint 2003 SP3 to find a specified chart in an Excel workbook, copy it, and then paste it into the current slide as an Enhanced Metafile with, ultimately, the following line of code: Application.ActiveWindow.View.PasteSpecial DataType:=ppPasteEnhancedMetafile As often as it works, I also receive the following error: Run-time error '-2147188160 (80048240)': View (unknown member) : Invalid request. The specified data type is unavailable. If I end the macro and attempt

问题 Closed. This question is off-topic. It is not currently accepting answers. Want to improve this question? Update the question so it's on-topic for Stack Overflow. Closed 4 years ago . I would like to know the best way to work with powepoint slides in php, Is there an api or some reading material to undesrtand how to extract the slides into different images? If yes, is there anyway to capture the animations? 回答1: I have always used phppowerpoint, it's pretty straight forward although it lacks

问题 I would like to color a sentence, in different color - say, the first half in red and rest in blue. my code so far is like from pptx import Presentation from pptx.util import Inches, Pt from pptx.dml.color import ColorFormat, RGBColor from pptx.enum.dml import MSO_COLOR_TYPE, MSO_THEME_COLOR import codecs prs = Presentation() title_slide_layout = prs.slide_layouts[0] slide = prs.slides.add_slide(title_slide_layout) text_file = open("content.txt", "r") # read the lyrics file lines = text_file

问题 Every week I separate a long PowerPoint file into separate files. The files must be in PowerPoint format, and contain only the slides that are contained in the 'sections' from the PowerPoint file. I need to: 1) Scan to see the number of slides in a given section 2) Make a file containing the slides within that section 3) Name that file the same as the name of the section, and save it in the same directory as the source file. 4) Repeat the process for subsequent sections. 5) Do this without

问题 Every week I separate a long PowerPoint file into separate files. The files must be in PowerPoint format, and contain only the slides that are contained in the 'sections' from the PowerPoint file. I need to: 1) Scan to see the number of slides in a given section 2) Make a file containing the slides within that section 3) Name that file the same as the name of the section, and save it in the same directory as the source file. 4) Repeat the process for subsequent sections. 5) Do this without

问题 I'm attempting to convert PPT files to PPTX files using VBSCRIPT. I haven't used VB in a very long time & am pretty unfamiliar with the framework. I'm attempting to modify a script that converts PPTX/PPT to PDF, however without much luck. Here's an example of what I've got so far... Option Explicit Dim inputFile Dim objPPT Dim objPresentation Dim objPrintOptions Dim objFso Dim pptf If WScript.Arguments.Count <> 1 Then WriteLine "You need to specify input and output files." WScript.Quit End If

问题 Following issue: I declare tbl as Table in VBA. I want to show some tables in PowerPoint. If the text of the cells are too long, the cells get big and they go beyond the slide limits. I want to avoid that. I just want to resize the text, that means, I just want that the text gets smaller, in order to fit within the cell. That means, cell-table size should not be changed! How would you do that? I've tried: ppPres.Slides(NumSlide).Shapes(NumShape).Table.Columns(col).Cells(1).Shape.TextFrame2

问题 Please help me make this code works. I want to open an external EXE file using Powerpoint VBA. Sub open_test() Dim FileName, FSO, MyFile FileName = "C:\test.exe" Set FSO = CreateObject("Scripting.FileSystemObject") Set MyFile = FSO.OpenTextFile(FileName, 1) End Sub There are no compiler errors, but when i execute the macro, it does nothing ... I have another alternatives to this code? please help me, thanks ! 回答1: If you just want to start the program, try using Sub open_test() Dim

问题 I have a folder of ~20 *.potx files and I would like to convert all *.potx files to *.pptx, then delete the *.potx files. 回答1: The following will loop through all your templates, convert, and delete the template files. Sub loopFiles() Dim fso As New FileSystemObject Dim fil As File Dim fold As Folder Set fold = fso.GetFolder(yourFolder) For Each fil In fold.Files If InStr(1, fil.Name, ".potx") > 0 Then Application.Presentations.Open fil.Path ActivePresentation.SaveAs Replace(fil.Path, ".potx"