Notifications
Clear all

Web browser retirar avisos erro de scripts

6 Posts
2 Usuários
0 Reactions
1,797 Visualizações
(@xman2000)
Posts: 0
New Member
Topic starter
 

Web browser retirar avisos erro de scripts

Olá Colegas!

o desafio agora é impedir os avisos de "erro nos scripts executados" na pagina do tipo:
"voce deseja continuar executando scripts nessa pagina? "

se nao for possivel inibir os avisos, gostaria que desse a resposta "sim" automaticamente pra todos os avisos.

este arquivo é diferente do que postei no outro topico,
é um webBrowser direto na celula, que em alguns Office 2013 isso é proibido mas tem como desativar a proibição.
segue o arquivo anexo.

 
Postado : 08/07/2015 6:31 pm
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

XMAN2000,

Esses erros de script acontecem porque o Browser está desatualizado...

Fiz uma pesquisa e encontrei um ActiveX extra do Mozilla Firefox, testei e funcionou certinho.

Se tiver interesse, baixe aqui: http://www.iol.ie/~locka/mozilla/control.htm

O código para usar é igual ao WebBrowser.

Sub Macro5()
    Plan1.Activate

    Dim CaminhoInteiro As Variant
    CaminhoInteiro = Worksheets("navegacao").Range("A1").Value
    
    Dim WB As MozillaBrowser
    Set WB = ActiveSheet.MozillaBrowser1
    WB.Navigate CaminhoInteiro
    WB.Height = 100
    WB.Width = 400
    
    Set WB = Nothing
End Sub
 
Postado : 09/07/2015 7:23 am
(@xman2000)
Posts: 0
New Member
Topic starter
 

Olá colega, muito grato pela ajuda!
seria legal se vc fizesse um passo-a-passo
de como baixou, instalou e colocou o activex no arquivo excel.
eu já baixei e instalei no windows, mas nao sei se está certo.
ainda estou tentando colocar o componente no excel.
não sei se precisa registrar o activex no Regedit.
grato.

 
Postado : 09/07/2015 7:38 am
(@xman2000)
Posts: 0
New Member
Topic starter
 

---------
edit: instalei o activex MozilllaBrowser classs e dá erro no arquivo excel fechando o mesmo (crash).

 
Postado : 09/07/2015 7:46 am
(@xman2000)
Posts: 0
New Member
Topic starter
 

alexandre_eng !
vc tentou inserir o activex da Mozilla direto na celula (sem ser num form)?
antes estava travando o Excel, e agora diz que é impossível inserir o objeto.
isso no webBrowser da Microsoft era problema de REGEDIT Registro do Windows, tinha de alterar a Flag de copatibilidade.
se for isso, preciso descobrir qual a chave de registro (caminho) pra fazer essa alteração, eu ja tenho um sisteminha que faz essa alteração, preciso descobir o caminho.

 
Postado : 09/07/2015 8:26 am
(@xman2000)
Posts: 0
New Member
Topic starter
 

Ol Alexandre!

consegui retirar os avisos com este codigo:
ActiveSheet.WebBrowser1.Silent = True

ainda vou tentar implementar o da Mozilla tbm.
abraço.

 
Postado : 09/07/2015 6:46 pm