VBAを使用してPowerpointの特定の名前付きTextBoxを削除する

スライドが105枚あるPowerPointプレゼンテーションがあります。各スライドには、TextBox4という名前のテキストボックスがあります。これらすべてのテキストボックスを削除したいのですが。

私はGoogle検索でいくつかのVBAコードを試しました。しかし、それはうまくいきません。

誰もがこれに関してVBAで私を助けてもらえますか。

vba microsoft-powerpoint presentations

— Programmer
ソース

よりよく理解するためにコードを更新してください。

— Linga

私たちはスクリプト作成サービスではありません。特定の問題を解決するために、ユーザーがこれまでに試したこと（使用しているスクリプトを含む）およびそれらが動かなくなった場所を教えてください。スクリプトを要求するだけの質問は広すぎて、そうなる可能性があります。保留または閉鎖。読んでください良い質問をするにはどうすればいいですか。。

— DavidPostill

私はそれをとてもよく知っています。どうもありがとうございました。しかし、使い方を教えてくれるのではなく、知識を共有しているとどうなりますか。

— Programmer

あなたがそのようなActiveXテキストボックスを意味すると仮定すると：

次のVBAコードを使用すると、すべてのシートをループ処理してテキストボックスを削除できます。

Sub DeleteTextBox()
    On Error Resume Next
    Dim PPSlide As Slide
    For Each PPSlide In ActivePresentation.Slides
        PPSlide.Shapes("TextBox4").Delete
    Next
End Sub

— Jonno
ソース