Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 VBA acionando a tecla F9

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
RogerioP



Mensagens : 2
Data de inscrição : 30/01/2013

MensagemAssunto: VBA acionando a tecla F9   Qua Jan 30, 2013 3:49 pm

Eu tenho um cod VBA que compara as celulas e executa a condiçao.

Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("relógio2").Range("f3") > Range("f1") Then
Beep
End If
End Sub

Só que ao inves do "BEEP" gostaria de acionar a tecla F9, pois tenho o "delta talk" (leitor de textos) que para ele ler uma celula no excel preciso acionar manualmente a tecla F9.
Minha intenção é uma automatizaçao por mensagem falada de acordo com uma certa condiçao.
Obs: Tambem consegui fazer funcionar um VBA que inicia um relogio atualizado e constantemente atualiza a horo (de seg em seg). Grato
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: VBA acionando a tecla F9   Qui Jan 31, 2013 7:34 pm

Boa tarde!!

Eu não entendi
Código:
Private Sub Workbook_Open()
Application.OnKey "{F9}", "SuaMacro"
End Sub
Voltar ao Topo Ir em baixo
Ver perfil do usuário
RogerioP



Mensagens : 2
Data de inscrição : 30/01/2013

MensagemAssunto: Re: VBA acionando a tecla F9   Sab Fev 02, 2013 2:20 pm

1-Tenho uma planilha que o relogio se atualiza automaticamente, feito em VBA.
2-Fiz em VBA um comparador de celulas, no caso F1 e F3, caso f3 >f1 executara um Beep.
3- Tenho instalado um soft "falador com o nome de DELTA TALK" ...ele fala tudo que estiver escrito na celula selecionada....porem isso so acontece quando teclo em F9 ou a tecla q eu programar...
4- Entao quero unir a funçao comparadora F1 F3 para disparar a tecla F9..
abaixo as sintaxes que ja fiz e nao deu certo..

Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("relógio2").Range("f3") > Range("f1") Then
Application.OnKey "{F9}"
End If
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("relógio2").Range("f3") > Range("f1") Then
calculate
End Sub

SOMENTE ESTA FUNCIONA
Private Sub Worksheet_Change(ByVal Target As Range)
If Sheets("relógio2").Range("f3") > Range("f1") Then
Beep
End If
End Sub

GRATO PELA SUA ATENÇAO
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Conteúdo patrocinado




MensagemAssunto: Re: VBA acionando a tecla F9   Hoje à(s) 10:50 pm

Voltar ao Topo Ir em baixo
 
VBA acionando a tecla F9
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» [RESOLVIDO]2 funções utilizando a mesma tecla???
» [TUTORIAL] - Menú mostrar/ocultar com uma só tecla!
» emulação de tecla
» Bloqueando tecla ctrl
» Como bloquear a tecla direita do mouse

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: