Удалить конкретный именованный TextBox в Powerpoint с помощью VBA

1865
Programmer

У меня есть презентация PowerPoint, которая имеет около 105 слайдов. На каждом слайде есть текстовое поле с именем TextBox4. Я хочу удалить все эти текстовые поля.

Я пробовал некоторый код VBA с помощью поиска Google. Но это не работает.

Может кто-нибудь помочь мне с VBA по этому поводу.

0
Не могли бы вы обновить код, чтобы лучше понять Linga 8 лет назад 0
Мы не сервис написания сценариев. Мы ожидаем, что пользователи сообщат нам, что они пробовали до сих пор (включая любые сценарии, которые они используют) и где они застряли, чтобы мы могли помочь с конкретными проблемами. Вопросы, которые задают только сценарии, слишком широки и, вероятно, будут [отложены или закрыты] (http://superuser.com/help/closed-questions). Пожалуйста, прочитайте [Как мне задать хороший вопрос?] (Http://superuser.com/help/how-to-ask). DavidPostill 8 лет назад 0
Я это очень хорошо знаю. Большое спасибо. Но что, если вы поделитесь знаниями, а не просто предложите мне, как использовать. Programmer 8 лет назад 0

1 ответ на вопрос

2
Jonno

Предполагая, что вы имеете в виду текстовое поле 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

Похожие вопросы