PowerPoint: Como excluir todas as caixas de texto em branco de uma só vez?

Question

Existem muitas caixas de texto com nada dentro de determinado arquivo ppt. Como excluir todas as caixas de texto em branco de uma só vez?

Além disso, essas caixas de texto em branco residem não apenas em uma página de um arquivo.

    

Answer 1

Selecione itens para ação \ deleção: isso pode ser feito com o ether CTRL-A ou você pode selecionar itens dentro de uma caixa quadrada usando o mouse (segure o botão esquerdo). Então soco DEL

    

Answer 2

Não há nenhuma maneira direta de excluir apenas as caixas de texto vazias no PowerPoint, mas você pode usar uma macro.

1. Abra sua apresentação do PowerPoint e pressione Alt + F11 . A janela do VBA aparecerá.
2. Inserir - > Módulo
3. Copie e cole o código abaixo.

Sub RemoveTextboxes()

Dim SlideToCheck As Slide

Dim ShapeIndex As Integer

For Each SlideToCheck In ActivePresentation.Slides

For ShapeIndex = SlideToCheck.Shapes.Count To 1 Step -1

  If SlideToCheck.Shapes(ShapeIndex).Type = msoTextBox And _
  Not SlideToCheck.Shapes(ShapeIndex).TextFrame.HasText Then

SlideToCheck.Shapes(ShapeIndex).Delete

End If

Next

Next

End Sub

4. Volte para o PowerPoint, vá para a guia Desenvolvedor (ative a guia Desenvolvedor abaixo), pressione Macros, selecione a caixa RemoveTextboxes () e clique em Executar.

5. Feito! Isso irá detectar todas as caixas de texto vazias da sua apresentação do PowerPoint.

Como fazer a TAB do desenvolvedor aparecer

1. Arquivo - > Opções - > Personalizar faixa de opções - > Na lista de Guias Principais, marque a caixa Desenvolvedor. FEITO!