Macro ALT+TAB e executar tarefa
Enviado: 21 Out 2016 às 09:17
Bom dia amigos;
Caros, possuo o código abaixo, para realizar uma tarefa de baixar arquivos de um site, a questão é:
- Como faço para executar a macro e acessar essa pagina já aberta (Chrome), e realizar o script abaixo, ja tentei usar: SendKeys ("%{TAB}"), mais ele não sai do excel:
Outra duvida, consigo colocar quantas etapas ele deve fazer o comando: SendKeys "{ENTER}", True , porque tem dias que tenho menos arquivo, outros tenho mais que 50 para baixar.
Caros, possuo o código abaixo, para realizar uma tarefa de baixar arquivos de um site, a questão é:
- Como faço para executar a macro e acessar essa pagina já aberta (Chrome), e realizar o script abaixo, ja tentei usar: SendKeys ("%{TAB}"), mais ele não sai do excel:
Outra duvida, consigo colocar quantas etapas ele deve fazer o comando: SendKeys "{ENTER}", True , porque tem dias que tenho menos arquivo, outros tenho mais que 50 para baixar.
Código: Selecionar todos
Sub Baixar_arquivos()
SendKeys ("%{TAB}")
sng = Timer
Do While sng + 2 > Timer
Loop
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
SendKeys "{TAB}", True
sng = Timer
Do While sng + 1 > Timer
Loop
SendKeys "{ENTER}", True
sng = Timer
Do While sng + 1 > Timer
Loop
SendKeys "{TAB}", True
SendKeys "{ENTER}", True
sng = Timer
Do While sng + 1 > Timer
Loop
SendKeys "{TAB}", True
MsgBox ("Arquivos baixados, verificar na pasta DOWNLOAD")
End Sub