Public Sub getSelectedTextInfo() Dim s As PowerPoint.Slide Set s = GetActiveSlide() If s Is Nothing Then Debug.Print "アクティブなスライドを取得できません。", vbCritical + vbSystemModal Else putCB ("スライドタイトル / 内容 = " & s.Shapes.T…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。
