マクロが有効な PowerPoint ドキュメント (PPTM) を持っており、マクロが有効でないドキュメント (PPTX) に「エクスポート」する機能を追加したいと考えています。これを実現するために、次の VBA コードを作成しました。
'Default selected file type PPTX
Dim selected As String: selected = Application.FileDialog(msoFileDialogSaveAs).Show()
Dim filePath As String
If selected <> 0 Then
filePath = Application.FileDialog(msoFileDialogSaveAs).SelectedItems(1)
ActivePresentation.SaveCopyAs fileName:=filePath, FileFormat:=ppSaveAsOpenXMLPresentation
End If
これは正しく機能し、関連する VBA コードなしでドキュメントを保存しますが、ソース PPTM ファイルに customUI メニューを含めましたが、これも削除したいと思います。これは、リボン タブがさまざまな VBA 機能にリンクしているためです。削除されました。
含まれている CustomUI メニューなしで PPTX に保存するにはどうすればよいですか? VBA を使用して CustomUI メニューを「削除」する方法はありますか (少なくとも Excel のHide/Showでは実際にはそのようには見えません)、またはCustomUI の Load イベント (このような例)?