Notifications
Clear all

Permissão Negada - Erro 70

4 Posts
2 Usuários
0 Reactions
1,282 Visualizações
(@joilsondo)
Posts: 47
Trusted Member
Topic starter
 

Galera,

Tenho este código em um Textbox, em um sistema VBA

Private Sub emissaonf_Change()

'Formata : dd/mm/aa
If Len(emissaonf) = 2 Or Len(emissaonf) = 5 Then
   emissaonf.Text = emissaonf.Text & "/"
   SendKeys "{End}", True
   End If
   Exit Sub
    

 End Sub

Eu utilizo o código acima para que o usuário não precise digitar a barra "/", quando ele vai digitar a data.

Porém em vários computadores dá certo, e tem um que quando o usuário executa o sistema e vai digitar a data, dá o erro "Permissão Negada" ERRO 70.

Alguém saberia me dizer pq em alguns micros dá certo e outros não?

Detalhe: é o mesmo excel 2003, e a segurança da macro dele está configurada para baixo.

Está faltando algo??

Vejam o anexo do erro.

Obrigado.

 
Postado : 07/08/2015 6:21 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Não havia visto essa mensagem de erro anteriormente, mas aparentemente não refere-se ao código mostrado, mas a configuração do equipamento acessado.
Verifique se nesse equipamento o usuário tem permissão de leitura e gravação/alteração de arquivos.

 
Postado : 07/08/2015 6:53 am
(@joilsondo)
Posts: 47
Trusted Member
Topic starter
 

Onde vejo isso Reinaldo? No proprio excel?

 
Postado : 07/08/2015 7:12 am
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Como disse e, provavelmente, a configuração do equipamento/micro. Deve ser visto nesse equipamento nas configurações do sistema operacional, se o usuário tem permissão de manipulação/acesso a arquivos

 
Postado : 07/08/2015 7:36 am