Fórum Excel Bácico, Avançado e Vba

Este fórum é destina a usuário de Excel, que queiram compartilhar informações a básicas, avançadas e programação em VBA...
 
InícioInício  FAQFAQ  BuscarBuscar  MembrosMembros  GruposGrupos  Registrar-seRegistrar-se  Login  

Compartilhe | 
 

 ETE 57121 e 32809

Ver o tópico anterior Ver o tópico seguinte Ir em baixo 
AutorMensagem
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: ETE 57121 e 32809   Sex Fev 21, 2014 5:16 pm

Como vocês são feras, gostaria muito dessa ajuda...

É o seguinte, minha planilha que é a mesma que postei aqui sempre funcionou bem, mas agora ela ao entrar na planilha dá o seguinte erro, impossibilitando de usá-la (usei 1 ano sem problemas):


Erro em tempo de execução '57121'
Erro de definição de aplicativo ou definição de objeto

assim que clico em fim já aparece essa:

Erro em tempo de execução '32809'
Erro de definição de aplicativo ou definição de objeto


e não posso inserir novos dados, nem buscar nada Sad


Se clico em depurar, vai na linha:

Private Sub cmdDocumento_Click()
'Verificar se foi digitado um nome na primeira caixa de texto
If txtCPF.Text = "" Then
MsgBox "Pesquisar pelo Número de Identificação do Visitante"
txtCPF.SetFocus
GoTo Linha1
End If
With Worksheets("Dados Visitantes").Range("A:A")
Set c = .Find(txtCPF.Value, LookIn:=xlValues, LookAt:=xlPart)
If Not c Is Nothing Then
c.Activate
txtCPF.Value = c.Value
txtNome.Value = c.Offset(0, 1).Value
txtEndereco.Value = c.Offset(0, 2).Value
cboEstado.Value = c.Offset(0, 3).Value
cboCidade.Value = c.Offset(0, 4).Value
txtTelefone.Value = c.Offset(0, 5).Value
txtEmail.Value = c.Offset(0, 6).Value

End If
End With
Linha1:
End Sub



Alguém sabe o que significa????

Desde já agradeço, pois sempre soluciono os problemas com vocês!
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 5:50 pm

Bom dia!!

Você alterou a versão que usava antes?
http://support.microsoft.com/kb/178982/pt-br

Tente postar seu arquivo modelo.

Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 5:54 pm

Então Alexandre, foi feito no Excel 2010 e está sendo usado no 2010, nada foi mudado! Estranho né!
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 6:54 pm

Boa tarde!!

Tem como postar o arquivo modelo?

Use um site gratuito como sendspace, depois deposite o link aqui.

Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 7:06 pm

http://www.sendspace.com/file/wneq81


Se se consegue interpretar o erro!



Abraços e compreendendo me diz o que é...


rs


Smile
Voltar ao Topo Ir em baixo
Ver perfil do usuário
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 9:18 pm

Espero que consiga baixar, está ai. OK!
Voltar ao Topo Ir em baixo
Ver perfil do usuário
alexandrevba



Mensagens : 1820
Data de inscrição : 13/07/2011
Localização : Serra - ES

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 9:24 pm

Boa tarde!!

E onde está o link?  drunken 

Att
Voltar ao Topo Ir em baixo
Ver perfil do usuário
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 9:29 pm

http://www.sendspace.com/file/wneq81



Mas tava acima Alexandre Smile




Smile
Voltar ao Topo Ir em baixo
Ver perfil do usuário
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: Re: ETE 57121 e 32809   Sex Fev 21, 2014 9:31 pm

https://fs01n3.sendspace.com/dl/98bdb907d545a33467d5241a272f8a16/53079ada37698690/wneq81/Teste.xlsm


Se ainda assim não conseguir tem esse, foi do site que me referendou...


Smile
Voltar ao Topo Ir em baixo
Ver perfil do usuário
celliusctba



Mensagens : 23
Data de inscrição : 17/10/2013

MensagemAssunto: Re: ETE 57121 e 32809   Qui Fev 27, 2014 3:12 pm

Muito difícil?


Conseguiu baixar ao menos?




Obrigado!
Voltar ao Topo Ir em baixo
Ver perfil do usuário
Conteúdo patrocinado




MensagemAssunto: Re: ETE 57121 e 32809   Hoje à(s) 1:34 pm

Voltar ao Topo Ir em baixo
 
ETE 57121 e 32809
Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo 
Página 1 de 1

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Fórum Excel Bácico, Avançado e Vba :: Avançado/VBA :: Excel Avançado/VBA-
Ir para: