Tag: screenshot

在Excel中使用VBA粘贴到Powerpoint中

我试图捕捉从Excel中与VBA连接的应用程序截图。 我想拍摄屏幕截图并粘贴到PowerPoint中。 不过，我希望每个屏幕都在新的幻灯片上。 昏暗的Pptapp作为新的PowerPoint.Application 设置pres = Pptapp.Presentations.Add 昏暗slidev为PowerPoint.Slide '（截图，这里不需要代码帮助） “需要帮助创build新幻灯片”需要帮助粘贴新幻灯片上的截图 我希望这能够循环通过下面的项目 “ “ （直到时间结束） 截图 新的幻灯片 粘贴在新幻灯片上 循环 Dim Pptapp As New PowerPoint.Application Set pres = Pptapp.Presentations.Add Dim slidev As PowerPoint.Slide PrintTheScreen ' function added else where Set slidev = pres.Slides.Add(1, PowerPoint.PpSlideLayout.ppLayoutBlank) slidev.Select PasteTheScreen ' function added else where 我需要做的.selectfunction，以确保幻灯片获取粘贴。