Blog Archive

About Me

A minha foto
JRod - PORTUGAL
Microsoft [MVP] - Excel (10º ano consecutivo)
Ver o meu perfil completo
Com tecnologia do Blogger.

Seguidores

Estatisticas

Free Blog Counter

eXTReMe Tracker
2005-03-14
Se pressionarmos a tecla de função F3, aparece, na célula pretendida, o resultado do Código a que a tecla está associada ( no exemplo, "Blog EXCELer"):



O Código:

Public Ops As String

Sub Auto_Open()

    Application.DisplayAlerts = False
    Application.OnKey "{F3}", "InsereNome"

End Sub

Sub InsereNome()

    Ops = Nome()
    ActiveCell = Ops
    
End Sub

Public Function Nome()

    Nome = "Blog EXCELer"
    
End Function