Dica: outros idiomas são traduzidos pelo Google. Você pode visitar o English versão deste link.
Entrar
x
or
x
x
Registre-se
x

or

Como limpar o conteúdo da caixa de texto quando clicado no Excel?

Normalmente, para limpar os conteúdos antigos de uma caixa de texto (Controle ActiveX), você precisa entrar na caixa de texto, selecionar todo o conteúdo e, em seguida, pressionar a tecla Retroceder ou Excluir. Como limpar todos os conteúdos rapidamente em uma caixa de texto? Este artigo irá mostrar-lhe um método VBA para limpar rapidamente o conteúdo de uma caixa de texto quando apenas clicar duas vezes nele.

Limpe o conteúdo da caixa de texto quando clicado com o código VBA


Limpe o conteúdo da caixa de texto quando clicado com o código VBA


O código VBA a seguir pode ajudá-lo a excluir rapidamente o conteúdo de uma caixa de texto ao clicar duas vezes nela. Faça o seguinte.

1. Se uma caixa de texto já existiu na planilha, ligue o Modo de Design clicando Desenvolvedor > Modo de design. Ver captura de tela:

Ou você também pode inserir uma caixa de texto clicando Desenvolvedor > inserção > Caixa de texto (controle ActiveX). Ver captura de tela:

2. Clique com o botão direito do mouse na caixa de texto e clique em Ver código no menu de contexto. Ver captura de tela:

3. Na abertura Microsoft Visual Basic para Aplicações janela, substitua o código VBA original na janela Código com código VBA abaixo.

Código VBA: Limpe o conteúdo de uma caixa de texto ao clicar duas vezes nela

Private Sub TextBox1_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
  If Not iGblInhibitTextBoxEvents Then
    TextBox1.Value = ""
  End If
End Sub

notas: No código, TextBox1 é o nome da caixa de texto da qual você irá limpar conteúdos. Por favor, mude para o seu próprio.

4. aperte o outro + Q chaves para sair do Microsoft Visual Basic para Aplicações janela.

5. Desligue o modo de design.

De agora em diante, ao clicar duas vezes em uma caixa de texto, seu conteúdo será limpo imediatamente.


Artigos relacionados:



Ferramentas de produtividade recomendadas para o Excel

Kutools for Excel ajuda você a concluir o trabalho antes do tempo e se destacar da multidão

  • Mais do que poderosos recursos avançados do 300, projetados para cenários de trabalho 1500, aumentando a produtividade em 70%, você tem mais tempo para cuidar da família e aproveitar a vida.
  • Não precisa mais memorizar fórmulas e códigos VBA, dê um descanso a seu cérebro a partir de agora.
  • Torne-se um especialista em Excel em minutos 3, operações complicadas e repetidas podem ser feitas em segundos,
  • Reduza milhares de operações de teclado e mouse todos os dias, diga adeus às doenças ocupacionais agora.
  • 110,000 pessoas altamente eficazes e escolha de empresas de renome mundial 300 +.
  • 60-day full features versão de avaliação gratuita. Garantias de devolução do dinheiro 60. 2 anos de atualização e suporte gratuitos.

Traz navegação com guias e edição para o Microsoft Office, muito mais poderosa do que as guias do navegador

  • A guia Office foi projetada para Word, Excel, PowerPoint e outros aplicativos do Office: Publisher, Access, Visio e Project.
  • Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
  • Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.