Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
modelo de cadastro
-
- Acabou de chegar
- Mensagens: 2
- Registrado em: Seg Jun 21, 2010 2:47 pm
modelo de cadastro
Olá boa tarde no aplicativo de modelo de cadastro eu gostaria de mudar o campo (NomeDaEmpresa) para (NomeDoFornecedor) quando tento alterar dá o seguinte erro.
Private Sub CarregaRegistro()
'carrega os dados do primeiro registro
With wsCadastro
If Not IsEmpty(.Cells(indiceRegistro, colCargoDoContato)) Then
Me.txtCodigoFornecedor.Text = .Cells(indiceRegistro, colCodigoDoFornecedor).Value
Me.txtNomeDoFornecedor.Text = .Cells(indiceRegistro, colNomeDoFornecedor).Value
Me.txtNomeContato.Text = .Cells(indiceRegistro, colNomeDoContato).Value
Me.txtCargoContato.Text = .Cells(indiceRegistro, colCargoDoContato).Value
Me.txtEndereco.Text = .Cells(indiceRegistro, colEndereco).Value
Me.txtCidade.Text = .Cells(indiceRegistro, colCidade).Value
Me.txtRegiao.Text = .Cells(indiceRegistro, colRegiao).Value
Me.txtCEP.Text = .Cells(indiceRegistro, colCEP).Value
Me.txtPais.Text = .Cells(indiceRegistro, colPais).Value
Me.txtTelefone.Text = .Cells(indiceRegistro, colTelefone).Value
Me.txtFax.Text = .Cells(indiceRegistro, colFax).Value
Me.txtHomePage.Text = .Cells(indiceRegistro, colHomePage).Value
End If
End With
Call AtualizaRegistroCorrente
End Sub
dá o seguinte erro de compilação metodo ou menbro de dados não encontrado
Fico no Aguardo!
Private Sub CarregaRegistro()
'carrega os dados do primeiro registro
With wsCadastro
If Not IsEmpty(.Cells(indiceRegistro, colCargoDoContato)) Then
Me.txtCodigoFornecedor.Text = .Cells(indiceRegistro, colCodigoDoFornecedor).Value
Me.txtNomeDoFornecedor.Text = .Cells(indiceRegistro, colNomeDoFornecedor).Value
Me.txtNomeContato.Text = .Cells(indiceRegistro, colNomeDoContato).Value
Me.txtCargoContato.Text = .Cells(indiceRegistro, colCargoDoContato).Value
Me.txtEndereco.Text = .Cells(indiceRegistro, colEndereco).Value
Me.txtCidade.Text = .Cells(indiceRegistro, colCidade).Value
Me.txtRegiao.Text = .Cells(indiceRegistro, colRegiao).Value
Me.txtCEP.Text = .Cells(indiceRegistro, colCEP).Value
Me.txtPais.Text = .Cells(indiceRegistro, colPais).Value
Me.txtTelefone.Text = .Cells(indiceRegistro, colTelefone).Value
Me.txtFax.Text = .Cells(indiceRegistro, colFax).Value
Me.txtHomePage.Text = .Cells(indiceRegistro, colHomePage).Value
End If
End With
Call AtualizaRegistroCorrente
End Sub
dá o seguinte erro de compilação metodo ou menbro de dados não encontrado
Fico no Aguardo!
Re: modelo de cadastro
Washington,
Se o erro foi o descrito, é porque o controle textBox "txtNomeDoFornecedor" não existe no form. Confira o nome dos controles para saber o que ajustar. Lembre-se de usar o Intellisense (Ctrl +Espaço) para auxiliar a encontrar os objetos declarados.
Abraços
Se o erro foi o descrito, é porque o controle textBox "txtNomeDoFornecedor" não existe no form. Confira o nome dos controles para saber o que ajustar. Lembre-se de usar o Intellisense (Ctrl +Espaço) para auxiliar a encontrar os objetos declarados.
Abraços
-
- Acabou de chegar
- Mensagens: 2
- Registrado em: Seg Jun 21, 2010 2:47 pm
Re: modelo de cadastro
Boa tarde meu amigo deu certo muito obrigado, agora tenho um outro problema quando coloco para alterar algum dado de alguém que já está cadastrado consigo alterar mas na hora de salvar ele diz que já está cadastrado o nome da pessoa e o telefone, sendo que eu alterei apenas o e-mail por exemplo.
no caso ele só aceita se eu alterar tudo.
como faço apenas para alterar uma letra e salvar?
no caso ele só aceita se eu alterar tudo.
como faço apenas para alterar uma letra e salvar?
Re: modelo de cadastro
Washington,
Não posso garantir o funcionamento da planilha após modificações. Coloque-a aqui para podermos tentar ajudar melhor.
Abraços
Não posso garantir o funcionamento da planilha após modificações. Coloque-a aqui para podermos tentar ajudar melhor.
Abraços
-
- Acabou de chegar
- Mensagens: 2
- Registrado em: Ter Set 04, 2018 2:26 pm
Re: modelo de cadastro
Seq. Maiores Ranking Seq. Resultados maiores
A B C D E
1 45 1 1 45
2 10 2 5 45
3 18 3 8 45
4 5 4 9 20
5 45 5 3 18
6 8 6 7 12
7 12
8 45
9 20
OBS: Gostaria de saber as formulas na Coluna D2 A D7, (158937)onde E2=45
;E3=45; E4=45; E5=20; E6=18 E E7=12 os maiores.
obrigado.
A B C D E
1 45 1 1 45
2 10 2 5 45
3 18 3 8 45
4 5 4 9 20
5 45 5 3 18
6 8 6 7 12
7 12
8 45
9 20
OBS: Gostaria de saber as formulas na Coluna D2 A D7, (158937)onde E2=45
;E3=45; E4=45; E5=20; E6=18 E E7=12 os maiores.
obrigado.
Re: modelo de cadastro
Aproveitando, baixei a planilha de modelo de cadastro do site (https://www.tomasvasquez.com.br/) mas percebi que todo campo, quando registrado apensa números, a busca não localiza, alguém que utiliza a planilha consegue me ajudar?