Saberexcel - o site das macros
Essas macros do Aplicativo Microsoft Excel VBA, a o Application.Método OnKey, executa um procedimento especificado quando uma determinada tecla ou combinação de teclas é pressionada, em nossos MODULOS COMO FAZER - PROGRAMAÇÃO MS EXCEL VBA, temos alguns bons exemplos de
como usar o método Onkey. Espero que essa matéria ajude de alguma forma . Fique com Deus, Boa Sorte - Expedito Marcondes

EM UM MÓDULO COMUM INSIRA AS MACROS

Sub Insere_Frase()
Sb = Frase()
ActiveCell = Sb
End Sub

Public Function Frase()
Frase = "Saberexcel - o site das macros"
End Function

para realização do teste de planilha inserí estas macros

Sub tecla_f3_desabilitada()
Application.OnKey "{F3}", ""
MsgBox ("Tecla F3 DESABILITADA!!!"), vbInformation, "Saberexcel - site das macros"
Application.DisplayAlerts = True
End Sub

Sub tecla_f3_habilitada()
Application.OnKey "{F3}", "Insere_Frase"
MsgBox ("Tecla F3 Habilitada"), vbInformation, "Saberexcel - site das macros"
Application.DisplayAlerts = False
End Sub

 NO MÓDULO DE PROGRAMAÇÃO DO OBJETO WORKBOOK INSIRA OS PROCEDIMENTOS

Public Sb As String

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.OnKey "{F3}", ""
Application.DisplayAlerts = True
End Sub

Private Sub Workbook_Open()
Application.DisplayAlerts = False
Application.OnKey "{F3}", "Insere_Frase"
End Sub

Aprenda tudo sobre o Aplicativo Microsoft Excel VBA com SaberExcel





Publicidade
Compre com segurança, garantia e ótimos preços , nas lojas SubMarino