时间戳

首页 > 解决方案 > VBA - 将幻灯片名称输出到文本框 PowerPoint

vba - VBA - 将幻灯片名称输出到文本框 PowerPoint

问题描述

我正在尝试复制幻灯片名称（而不是标题）以显示在同一张幻灯片的文本框中。我可以获取幻灯片名称的整个列表以输出到外部文件或出现在即时窗口中。是否有某种复制/粘贴语法或隔离输出可以工作？

标签： vbaexportpowerpointslidenames

解决方案

stackoverflow 问题的期望是您展示您的工作代码，以便人们可以看到您尝试过的内容，并为您提出的问题添加上下文。但是也许可以尝试这样的事情，它只是为每张幻灯片添加一个包含幻灯片名称的文本框：

Option Explicit

Public Sub SlideNames()

    Dim WorkSlide As Slide
    Dim WorkTextBox As Shape
        
    For Each WorkSlide In Application.ActivePresentation.Slides
        Set WorkTextBox = WorkSlide.Shapes.AddTextbox(msoTextOrientationHorizontal, 10, 10, 100, 20)
        WorkTextBox.TextFrame.TextRange.Text = WorkSlide.Name
    Next

End Sub

推荐阅读