есть много текстовых полей с ничего внутри в определенный файл ppt. Как удалить все пустое текстовое поле за один раз?
кроме того, эти пустые текстовые поля находятся не только на одной странице файла.
кроме того, эти пустые текстовые поля находятся не только на одной странице файла.
выберите элементы для действия \ удаления: это можно сделать с помощью эфира CTRL-A или вы можете выбрать элементы в квадратном поле с помощью мыши (удерживая нажатой левую кнопку). Затем удар DEL
нет прямого способа удалить только пустые текстовые поля в PowerPoint, но вы можете использовать макрос вместо этого.
Sub RemoveTextboxes ()
Тусклый SlideToCheck Как Слайд
Dim ShapeIndex Как Целое Число
Для Каждого SlideToCheck В ActivePresentation.Слайды
Для ShapeIndex = SlideToCheck.Формирует.Считать До 1 Шага -1
If SlideToCheck.Shapes(ShapeIndex).Type = msoTextBox And _ Not SlideToCheck.Shapes(ShapeIndex).TextFrame.HasText Then
SlideToCheck.Формы(ShapeIndex).Удалить
Конец Если
Next
Next
Конец Sub
вернитесь в PowerPoint, перейдите на вкладку Разработчик (активируйте вкладку Разработчик ниже), нажмите макросы, выберите RemoveTextboxes () и нажмите Работать.
готово! Это будет detele все пустые текстовые поля из презентации PowerPoint.
как сделать вкладку Разработчик появляются
Постоянная ссылка на данную страницу: [ Скопировать ссылку | Сгенерировать QR-код ]