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.
Question
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 to comment
Share on other sites
0 answers to this question
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.