Tag: powerpoint
dynamic更新数据从Excel到现有的Powerpoint
我仍然在寻找解决这个问题的正确方法。 我已经尝试了很多方法，它仍然不能工作，我甚至尝试操纵一些代码，但仍然无法正常工作 我已经从Excel仪表板中获得了一堆数据 我已经有了包含图表的Powerpoint 我需要从Excel中更新数据，并且Powerpoint中的图表可以dynamic更新
在Excel中将Excel表格拉伸到PowerPoint中
我试图通过C＃展开PowerPoint中的表格 表格已经从Excel复制到PowerPoint中，问题是粘贴表格的内容很小，无法读取。 我正在做的基本上是，复制HTML文件到 Clipboard.SetText(html); 将其粘贴到Excel范围内 sheet.Range(cellmapp).PasteSpecial(); sheet.Columns.AutoFit(); sheet.Rows.AutoFit(); sheet.UsedRange.Copy(Missing.Value); 现在，我想要将它粘贴到PowerPoint中的正确位置 foreach (PowerPoint.Slide slide in presentation.Slides) { foreach (PowerPoint.Shape pptshape in slide.Shapes) { if (!pptshape.Type.ToString().Equals("msoAutoShape") && pptshape.AlternativeText.Contains("|")) { if (xlsSheetName == pptSheetName && xlsShapeName == pptxlsShapeName) { ppApp.ActiveWindow.View.PasteSpecial(); } } } } 它在我select的地方在PowerPoint中复制我的表格。 但问题在于，桌子太小，太小，太小，太小。 C＃中有一个伸缩函数吗？ 谢谢。
在Powerpoint幻灯片中更新链接的Excel幻灯片
我有一个PowerPoint演示文稿，需要不断循环才能不断显示信息。 我希望在一张幻灯片中链接的Excel工作表对象每次显示幻灯片时刷新其数据，在循环演示中显示更新的数据。 我怎么去做这个？
使用Powerpoint VBA将Excel图表导出为图像
我有下面的代码，我写了导出“Chart1”从一个名为“Sheet1”的Excel工作表到一个新的幻灯片在一个创build的Powerpoint实例： Sub ChartsToPowerPoint() Dim pptApp As PowerPoint.Application Dim pptPres As PowerPoint.Presentation Dim pptSlide As PowerPoint.Slide Dim pptSlideCount As Integer Dim ws As Worksheet Dim intChNum As Integer Dim objCh As Object 'Open PowerPoint and create a new presentation. Set pptApp = New PowerPoint.Application Set pptPres = pptApp.Presentations.Add 'Set the chart and copy it to a […]
将Excel图表和表格复制到Powerpoint
我正在尝试在Excel中创build图表和表格，然后通过PowerPoint VBAmacros将其复制到幻灯片中。 我有创build的图表和表格，但我有复制和粘贴它们的问题。 我不熟悉这样做的语法。 任何帮助将不胜感激，因为我是新的PowerPoint VBA。 Sub GenerateVisual() Dim dlgOpen As FileDialog Dim folder As String Dim excelApp As Object Dim xlWorkBook As Object Dim xlWorkBook2 As Object Dim PPT As Presentation Dim Name1 As String Dim Name2 As String Set PPT = ActivePresentation Set excelApp = CreateObject("Excel.Application") excelApp.Visible = True Set xlWorkBook = excelApp.workbooks.Open("C:\Users\wzawisa\Downloads\MarketSegmentTotals.xls") […]
Excel VBA不会打开networking驱动器上的PPT文件
我有一个非常旧的VBA文件，是由其他人有限的意见来解释它创build的。 该文件是一个培训文件，要求提供名称，然后提供您可以查看的文件名以进行培训。variables从5个不同的子例程中传递。 RetVal = Shell("C:\Program Files\Microsoft Office\OFFICE11\PPTVIEW.EXE " & ProgFile, 1) 这是从Excel中打开PowerPoint 4.0文件的行。 ProgFile是一个传入的variables。 我的问题：如果我把文件放在C:\盘的目录下（说C:\Training\Forklift.ppt ）文件打开罚款和程序做它应该做的。 但是：将这些相同的PPT文件放在我的networking驱动器（ S:\Training\Forklift.ppt ）我得到三个错误信息作为popup窗口没有编入程序（我怀疑系统错误）。 （path名称被改为显示为S:\ PowerPoint Viewer无法find文件RECORDS PowerPoint查看器找不到文件Safety PowerPoint Viewer找不到文件Forklift.ppt RECORDS和Safety不是被任何子程序使用的文件。 是因为Shellfunction打开PowerPoint或其他神秘的东西，我俯瞰？ 我正在尝试重写Subroutines，这是给我的问题不变的代码的一部分。
从Excel中的数据更新现有的PowerPoint
我的意图是打开现有的PowerPoint演示文稿以及现有的Excel工作簿，然后从Excel中运行一个VBAmacros，它将更新PowerPoint中的相应值。 为此，我已经确定了要在PowerPoint中更新的相应文本框的形状名称，方法是突出显示特定的文本框，并使用“ Format -> Align 。 然后我在Excel中创build了3列，其值为： Slide index Shape name Value 1 Title 2 =CONCATENATE("REPORT ";YEAR(TODAY())) 1 Placeholder for date1 =TODAY() 我使用macros（我不记得从哪个网站复制它）： Sub writedata() Dim c As Object Dim shapeslide Dim shapename Dim shapetext Set ppapp = GetObject(, "Powerpoint.application") Set pppres = ppapp.ActivePresentation For Each c In Blad2.Range("a2:a" & Blad2.Range("a" & Rows.Count).End(xlUp).Row) shapeslide = […]
使用C＃dynamic添加范围值到Excel图表
我正在尝试使用C＃.net生成幻灯片幻灯片的图表。 当我对数据进行硬编码时，图表完美地工作，所以我的目标是能够从我的应用程序数据表中填充excel后端。 我需要帮助的是定义数据范围（见下文） var areaworkbook = (EXCEL.Workbook)areachart.ChartData.Workbook; areaworkbook.Windows.Application.Visible = false; var dataSheet2 = (EXCEL.Worksheet)areaworkbook.Worksheets[1]; var sc2 = areachart.SeriesCollection(); dataSheet1.Cells.Range["A2"].Value2 = "Name 1"; dataSheet1.Cells.Range["A3"].Value2 = "Name 2"; dataSheet1.Cells.Range["A4"].Value2 = "Name 3"; dataSheet1.Cells.Range["A5"].Value2 = "Name 4"; dataSheet1.Cells.Range["B2"].Value2 = Value 1; dataSheet1.Cells.Range["B3"].Value2 = value 2; dataSheet1.Cells.Range["B4"].Value2 = value 3; dataSheet1.Cells.Range["B5"].Value2 = value 4 ; var series2 = sc2.NewSeries(); […]
如何使用VBAdynamic引用PowerPoint幻灯片
我编写了一个macros，用于打开一个Excel文件，创build一个PowerPoint图表，并使用Excel文件中的工作表中的数据填充图表工作表。 我试图改变macros来循环通过Excel文件的工作表和： 为每个工作表创build一个PowerPoint幻灯片和图表 使用Excel文件中的工作表中的数据填充PowerPoint图表 目前，当我运行macros，第一个PowerPoint图表和幻灯片正确创build。 第二张幻灯片是为Excel文件的第二张工作表创build的，但未正确创buildPowerPoint图表。 我正在testingmacros的工作簿有两个工作表。 什么是dynamic引用每个新的PowerPoint幻灯片的正确方法？ 截至目前我一直在使用： Set pptWorkSheet = pptWorkBook.Worksheets(ActivePresentation.Slides.Count) 'sorta works-changed 8/19 当我去debugging器它说ActivePresentation.Slides.Count = 2所以我不知道为什么它没有传输数据到第二个PowerPoint图表。 我也可能不会在这里正确引用Excel文件工作表： pptWorkSheet.Range("a2:b5").Value = xlWB.ActiveSheet.Range("a2:b5").Value 下面是完整的macros： Sub CreateChartAllWKs() 'Create variables Dim myChart As Chart Dim pptChartData As ChartData Dim pptWorkBook As Excel.Workbook Dim pptWorkSheet As Excel.Worksheet Dim xlApp As Excel.Application Dim xlWB As Workbook Dim xlWS As […]
从我的权力点图数据点，并把它们放入一个Excel表
几年前，为了一个大师级的项目，我的朋友从一张excel表格里拿出一堆数据，并用它们作为一个简报。 他告诉我，他用excel制作了这个图表，然后把它复制到了幻灯片中。 现在，当我将鼠标hover在图上时，我看到了与鼠标hover在哪里相关的点。 我的朋友失去了原来的excel表，并要求我帮助从powerpoint图中拉出数据，并将其放入excel表。 我怎么去做这个？ 如果将这些点取入json文件，我可以完成剩下的工作。 我对powerpoint图表一无所知。
