Tag: powerpoint 2010

使用目标主题和embedded工作簿（h）: 我正在尝试复制在工作簿工作表中创build的ChartObject，并将其粘贴到Powerpoint 2010幻灯片中，以使其成为具有数据（embedded式）的独立Excel图表。当我手动做，即：在WorkSheet中复制ChartObject 转到Powerpoint幻灯片点击PasteSpecial并select“使用目标主题和embedded工作簿（H）”。在Powerpoint中右键单击ChartObject并单击“编辑数据”。然后我得到一个新的标题“图表在Microsoft Excel中”的独立工作簿，它显示图表以及数据。我还没有能够复制这种情况下，我得到一个新的单独的工作簿与标题“图表在Microsoft Excel”使用Excel VBA。有人可以帮忙吗？假设表单中有一个简单的柱形图，下面是代码： Option Explicit Sub doit() Dim Temp As Workbook Dim Rng As Range Dim ChtObj As ChartObject With ThisWorkbook.Sheets(1) Set ChtObj = .ChartObjects(1) With ChtObj .Copy End With Dim ppapp As Object Dim pppres As Object Dim ppslide As Object On Error […]

在Powerpointembedded式Excel工作簿中保存VBA代码: embedded到Powepoint演示文稿中的Excel工作表中创build的VBA不会被保存。我有一个Powerpoint文件，其中插入了一个图表，从而创build一个embedded式Excel工作簿。我已经尝试添加一些VBAembedded式Excel工作簿。 IT一切正常，我的VBA按预期工作。直到我closures了embedded式的Excel文件并试图重新打开它（通过右键单击Powerpoint图表并单击编辑数据）。重新打开之后，我所有的VB都不见了。我怀疑这与embedded式Excel文件不是macros启用有关，但我不知道如何改变这一点。（如果需要，很高兴提供一个示例文件）

VBA Powerpoint 2010replace页眉和页脚中的文本: 挑战PowerPoint模板的页眉/页脚中的[DOCID＃]代码。我注意到在PowerPoint对象浏览器中，在演示文稿（SlideMaster，NotesMaster，HandoutMaster，TitleMaster，然后是每个单独的幻灯片）的许多部分都可以find页眉和页脚。我正在运行XL中的代码，并且引用了PowerPoint库的Dim'ed。 Set ppPres = ppApp.Presentations.Open(sTemplate) Set ppMaster = ppPres.SlideMaster With ppMaster.HeadersFooters .Footer.Text = Replace(.Footer.Text, "[DOCID#]", sDocID) End With If ppPres.HasNotesMaster Then Set ppMaster = ppPres.NotesMaster With ppMaster.HeadersFooters .Footer.Text = Replace(.Footer.Text, "[DOCID#]", sDocID) .Header.Text = Replace(.Header.Text, "[DOCID#]", sDocID) End With End If If ppPres.HasHandoutMaster Then Set ppMaster = ppPres.HandoutMaster With ppMaster.HeadersFooters .Footer.Text = Replace(.Footer.Text, […]

将resize的图片从Excel导出到PowerPoint 2010: 我创build了一个将图片从Excel复制到新的PowerPoint演示文稿的代码。该代码适用于MS Office 2016，但不是 MS Office 2010.特别是，导出到PowerPoint的图片不会在2010年的.pptxresize。我怎样才能解决这个问题？以下是在MS 2010中不起作用的有问题的代码片段： Application.Goto Reference:="Full_Account_Performance" Application.CutCopyMode = False Selection.CopyPicture Appearance:=xlScreen, Format:=xlPicture PPPres.Slides(x).Shapes.PasteSpecial On Error Resume Next With PPApp.ActiveWindow.Selection.ShapeRange .ScaleHeight 0.435, msoFalse, msoScaleFromTopLeft 'Powerpoint 2010 ingnors it… but in 2016 it is fine .Left = 10 .Top = 55 End With

你能移动Excelfunction区吗？: 当我在我的工作笔记本电脑上工作时，我尝试最大化我的14英寸的屏幕空间，我尝试隐藏function区，以便只在将鼠标移动到屏幕顶部时出现，但我真正喜欢的是移动function区，以便我可以在屏幕的左侧或右侧垂直定位，就像使用Windows任务栏所做的一样。有没有办法在Microsoft Office中做到这一点，或隐藏function区的唯一select？

从PowerPoint中打开一个Excel工作表: 我正在使用Office 2010 ，我想从PowerPoint幻灯片中打开特定的Excel。 PowerPoint幻灯片应该看起来如下：在幻灯片上，我有一个对象或链接，当我点击它，所需的Excel表打开。我试图打开它通过选项： Insert>Object>Microsoft Excel Worksheet这基本上给了我一个新的Excel工作表。任何build议如何做到这一点？

从Excel VBA创build图表到PowerPoint，并将源代码链接到Excel中的特定表格: 我想要：在PowerPoint中创build一个图表从Excel中将数据源链接到我在Excel文件中的范围或者将PowerPoint存储数据源的工作表replace为我的数据我是VBA的初学者（一周试图学习）我这样做： Dim ChartDataRange As Excel.Range Dim myWorksheet As Worksheet Set ChartDataRange = Excel.Range("Chart_Data_Range") Dim ChartRelativePerfBox As PowerPoint.Shape 'Now open PowerPoint Dim pptApp As New PowerPoint.Application 'Keep it visible because we need to see it and be able to save it pptApp.Visible = True 'Tell VBA that FinancialSlide is a PowerPoint presentation Dim […]