Fórum Excel Bácico, Avançado e Vba
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
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  Últimas imagensÚltimas imagens  ProcurarProcurar  RegistarRegistar  Entrar  

 

 VBA acionando a tecla F9

Ir para baixo 
2 participantes
AutorMensagem
RogerioP




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

VBA acionando a tecla F9 Empty
MensagemAssunto: VBA acionando a tecla F9   VBA acionando a tecla F9 EmptyQua 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
Ir para o topo Ir para baixo
alexandrevba

alexandrevba


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

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

Boa tarde!!

Eu não entendi
Código:
Private Sub Workbook_Open()
Application.OnKey "{F9}", "SuaMacro"
End Sub
Ir para o topo Ir para baixo
RogerioP




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

VBA acionando a tecla F9 Empty
MensagemAssunto: Re: VBA acionando a tecla F9   VBA acionando a tecla F9 EmptySáb 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
Ir para o topo Ir para baixo
Conteúdo patrocinado





VBA acionando a tecla F9 Empty
MensagemAssunto: Re: VBA acionando a tecla F9   VBA acionando a tecla F9 Empty

Ir para o topo Ir para baixo
 
VBA acionando a tecla F9
Ir para o topo 
Página 1 de 1
 Tópicos semelhantes
-
» TECLA DE ATALHO VBA
» Tecla TAB e eventos parando de funcionar
» Macro do Excel que indique que a tecla DEL foi pressionada
»  FUNÇÃO DA TECLA "ENTER" NO EXEL 2013
» Executar uma macro por tecla de atalho no Excel 2010

Permissões neste sub-fórumNão podes responder a tópicos
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: