[Resolvido]Abrir atalho pelo botão

Usuarios/ Administradores,

Consigo abrir um programa (atalho) ao clicar num botão de formulário?

Exemplo: Ao clicar no botão do formulário iria abrir o internet explorer (exemplo que veio a mente).

abrir um site de um campo (pode ser o google)

Private Sub btn_Click()
If Not IsNull(WEBSITE) Then
Application.FollowHyperlink WEBSITE
End If
End Sub

para calculadora do windows

Private Sub SeuBotao_Click()
' Especificar 1 como o segundo argumento abre o aplicativo em
' tamanho normal e o coloca em foco.
Dim RetVal
RetVal = Shell("C:\WINDOWS\system32\calc.EXE", 1) ' Execute a calculadora.
End Sub

geral:
C:\NomeDoPrograma.EXE