Eu fiz um tópico recentemente de uma macro que precisa trabalhar com o Lotus Notes. Bem essa mesma macro em outra parte do proceso precisa ativar um script:
Sub AbrePagina()
Dim browser As Variant
Set browser = CreateObject("InternetExplorer.Application")
browser.Navigate ("C:\Documents and Settings\xxxxxx\Desktop\LerListaTaxas.html")
browser.Visible = True
browser.Quit
End Sub
Bem o script roda normalmente (ele captura umas informações de uma página da intranet e salva em um arquivo .txt), o meu problema aqui é que no momento em que o programa salva as informações aparece uma caixa de dialogo sobre interação de controles AcitveX. Eu gostaria de saber como na macro eu consigo ou desativar essa caixa de dialogo ou confirmar, para que o processo possa continuar automaticamente.
Pergunta
M3W
Eae pessoal...
Eu fiz um tópico recentemente de uma macro que precisa trabalhar com o Lotus Notes. Bem essa mesma macro em outra parte do proceso precisa ativar um script:
Sub AbrePagina() Dim browser As Variant Set browser = CreateObject("InternetExplorer.Application") browser.Navigate ("C:\Documents and Settings\xxxxxx\Desktop\LerListaTaxas.html") browser.Visible = True browser.Quit End SubBem o script roda normalmente (ele captura umas informações de uma página da intranet e salva em um arquivo .txt), o meu problema aqui é que no momento em que o programa salva as informações aparece uma caixa de dialogo sobre interação de controles AcitveX. Eu gostaria de saber como na macro eu consigo ou desativar essa caixa de dialogo ou confirmar, para que o processo possa continuar automaticamente.
Link para o comentário
Compartilhar em outros sites
0 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.