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

or

Como forçar a maiúscula e minúscula da entrada de texto em uma caixa de texto?

No Excel, podemos converter rapidamente a minúscula em letras maiúsculas no texto da célula usando a função UPPER, mas você já tentou forçar o texto inserido a ser maiúsculo em uma caixa de texto? Este artigo, vou apresentar um código simples para terminar este trabalho.

Forçar maiúsculas de entrada de texto em uma caixa de texto com código VBA


arrow blue right bubble Forçar maiúsculas de entrada de texto em uma caixa de texto com código VBA


Forçando o texto a ser inserido em maiúscula em uma caixa de texto, o seguinte código VBA pode fazer você um favor:

1. Em primeiro lugar, insira a caixa de texto clicando Developer > inserção > Caixa de texto (controle ActiveX), e então desenhe uma caixa de texto conforme você precisa, veja a captura de tela:

caixa de texto do doc maiúscula 1

2. Depois de inserir a caixa de texto, clique com o botão direito do mouse e selecione Ver código no menu de contexto para abrir o Microsoft Visual Basic para Aplicações janela e, em seguida, substitua o código original pelo seguinte código VBA no módulo em branco:

Código VBA: Force o texto a ser maiúscula na caixa de texto:

Private Sub TextBox1_Change()
    TextBox1.Text = UCase(TextBox1.Text)
End Sub

caixa de texto do doc maiúscula 2

3. Salve e feche a janela de código e saia do Modo de design, agora, quando você digita texto na caixa de texto, será forçado a entrar como maiúscula, veja a captura de tela:

caixa de texto do doc maiúscula 3


Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Inserir rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de endereços e enviar e-mails ...
  • Bar Super Fórmula (facilmente editar várias linhas de texto e fórmula); Layout de leitura (leia e edite facilmente grandes números de células); Colar para intervalo filtrado...
  • Mesclar células / linhas / colunas sem perder dados; Conteúdo de células divididas; Combinar linhas / colunas duplicadas... Prevenir Células Duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Exclusivo Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros de trabalho; Seleção aleatória ...
  • Cópia exata Múltiplas Células sem alterar a referência da fórmula; Criar automaticamente referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair texto, Adicionar texto, remover por posição, Remover espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salve e aplique esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro especial por negrito, itálico ...
  • Combinar pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Dividir dados em várias planilhas; Lote Converter xls, xlsx e PDF...
  • Mais de recursos poderosos do 300. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Recursos completos Avaliação gratuita de um dia de 30.
kte tab 201905

A guia Office traz a interface com guias para o Office e torna seu trabalho muito mais fácil

  • Ativar edição e leitura com guias no Word, Excel, PowerPoint, 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!
fundo officetab
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.