Saber como apagar texto tachado com VBA permite que você rapidamente apagar este conteúdo potencialmente perturbador de seu documento. Desde VBA não requer nenhuma intervenção do usuário para executar esta tarefa, ele pode fazê-lo sem erro humano. O recurso VBA no centro deste projeto é a propriedade "Fonte" da classe " Range" , de que todas as palavras em seus documentos são membros. A propriedade "Fonte" tem várias propriedades do componente que armazenam toda a formatação que você aplica a uma palavra , como o efeito tachado. Instruções
1
Pressione "Control " e " N" para criar um novo documento do Word, em seguida, digite algumas palavras para ele. Clique duas vezes em uma das palavras para selecioná-lo , em seguida, pressione "Control" e "D" simultaneamente para exibir a caixa de diálogo "Fonte" . Clique na caixa " rasurado " para colocar esse efeito sobre a palavra e clique em "OK" para fechar a caixa de diálogo.
2
Clique no botão " Arquivo" "Opções" do item de guia , em seguida, clique no botão " personalizar " o comando da " Fita painel Categorias " . Essas ações levá-lo para a opção para permitir a exibição do guia "Desenvolvedor" , que detém o botão para trabalhar com VBA.
3
Clique na caixa " desenvolvedores" para fazer o Word mostrar o " desenvolvedor "guia, em seguida, clique em" OK "para fechar a " Opções " caixa de diálogo .
4
Clique no " botão " do guia" desenvolvedor Visual Basic "para abrir o ambiente de desenvolvimento do Visual Basic , que permite para escrever, editar e depurar programas.
5
Clique comando "Module" do menu "Inserir" para criar uma nova janela para a entrada de programas , em seguida, cole o seguinte programa para a nova janela. Este programa lê a propriedade " rasurado " de cada palavra no documento atual , e exclui a palavra se que o valor da propriedade é " verdadeira ". O programa usa a função da palavra "Excluir " , que os programadores VBA chamar um " método", para realizar a exclusão.
Public Sub delStrikeThrough ()
Dim w
Com ActiveDocument
Para cada W In. palavras
Se w.Font.StrikeThrough = True Then
w.Delete
End If
Próxima
End With
Sub End
6
Clique em qualquer das declarações do programa, em seguida, clique do menu " Debug " " Passo em " comando , que permite a que você execute um programa de uma declaração de cada vez. A execução de um programa desta forma ajuda a entender o efeito de cada declaração .
7
Pressione " F8" repetidamente para avançar o cursor para a próxima instrução do programa. Observe que o programa só executa o "Excluir " declaração de uma vez - para a única palavra com a fonte tachado você aplicou na etapa um
8
Continue pressionando "F8" até que o destaque desaparece , indicando . o programa terminar a execução .
9
Clique no ícone " Palavra " na barra de tarefas do Windows para retornar ao Word . Observe que a palavra com a fonte tachado foi excluído.
