top of page

inscreva-se

  • YouTube ícone social

VBA!

Canal no Youtube criado por Amanda Nascimento 

Sem título.png
EXCEL
POWER QUERY
POWER PIVOT
OFFICE SCRIPT

KEYCODE

Os exemplos abaixo tem exatamente o mesmo comportamento/função, porém no primeiro utilizamos o KeyCode e no segundo o Valor do KeyCode.

  • Exemplo genérico utilizando o KeyCode
     

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)

  If KeyCode = vbKeyReturn Then MsgBox "Função Excel"

End Sub

  • Exemplo genérico utilizando o Valor do KeyCode

    Private Sub TextBox1_KeyDown(KeyCode As Integer, Shift As Integer)

  If KeyCode = 13 Then MsgBox "Função Excel"

End Sub

Ambos os código de exemplo acima, exibem uma caixa de mensagem escrito “Função Excel” quando a tecla ENTER é pressionada no TextBox1.

 

Este foi apenas um exemplo geral, você pode utilizar os eventos de pressionar tecla de outras formas, seguindo esta mesma linha de raciocínio.

© 2017-2025  Criado e desenvolvido por Amanda Nascimento

  • Discord
  • GitHub
  • youtube
  • LinkedIn Amanda
bottom of page