Arquivo da tag: SetFocus

VBA – EXEMPLO DE SETFOCUS E SAÍDA DO CONTROLE QUANDO ESTE ESTIVER VAZIO

Devido ao número de solicitações em referente a Propriedade Setfocus, ou como dizem, evitar de sair de um controle se ele estiver em branco, e geralmente utilizam somente o Evento EXIT, só que dependendo da estrutura, cria-se o inconveniente de quando o controle estiver em branco e clicar em um Botão para fechar o Formulário recebemos a mensagem que o preenchimento é obrigatório, só que não queremos preenche-lo no momento e sim somente fechar o formulário.

Baseando-me nestas solicitações montei um modelo onde utilizo um Frame e uma Variável para anular a Propriedade Cancel do Evento Exit, e aproveitei para deixar o textbox com aceitação só de numeros/ datas e somente texto.

Com certeza existem outras formas, mas a que eu geralmente utilizo é esta, então segue para quem precisar.

  • Userfom Eventos Exit – KeyPres – Change
  • Userform sem o “X” para fechar o formulário.
  • Controles somente Datas e Textos

Evento Exit - SetFocus

Download do arquivo

SetFocus Evento Exit.zip (74.64 KiB)

Post no fórum

http://www.tomasvasquez.com.br/forum/viewtopic.php?p=18978