Boa tarde Pessoal
Encontrei um pequeno bug num modelo de cadastro que está postado no link:
Versão 2 http://www.tomasvasquez.com.br/download ... tro_v2.zip
Não sei se já foi respondido ou não.
De qualquer forma o erro acontece assim:
Clico em "Novo" e cadastro um nome qualquer. Clicar em Salvar, para que salve. Sem sair do cadastro e sem se deslocar para outros lançamentos, clique em "Alterar" e digite algo.
A alteração irá sobrepor o primeiro lançamento da planilha. O que é possível fazer para evitar isto?
Vídeo recomendado
https://youtu.be/diWPPPhW-9E
https://youtu.be/diWPPPhW-9E
Erro de Linha ao salvar
-
- Colaborador
- Mensagens: 62
- Registrado em: Sáb Fev 27, 2016 7:31 pm
-
- Colaborador
- Mensagens: 62
- Registrado em: Sáb Fev 27, 2016 7:31 pm
Re: Erro de Linha ao salvar
Encontrei a resposta dada pelo fabricio_sp30
viewtopic.php?f=5&t=651&start=10
If optNovo.Value Then
proximoId = PegaProximoId
'pega a próxima linha
Dim proximoIndice As Long
'atualiza o arquivo para pegar o próximo registro atualizado
Call AtualizarArquivo(False)
proximoIndice = wsCadastro.UsedRange.Rows.Count + 1
Call SalvaRegistro(proximoId, proximoIndice)
Call CarregaDadosInicial ' INCLUSAO PARA SOLUCAO DE DUPLICIDADE
Call btnUltimo_Click ' INCLUSAO PARA SOLUCAO DE DUPLICIDADE
txtCodigoID = proximoId
lblMensagem.Caption = "Registro salvo com sucesso."
End If
viewtopic.php?f=5&t=651&start=10
If optNovo.Value Then
proximoId = PegaProximoId
'pega a próxima linha
Dim proximoIndice As Long
'atualiza o arquivo para pegar o próximo registro atualizado
Call AtualizarArquivo(False)
proximoIndice = wsCadastro.UsedRange.Rows.Count + 1
Call SalvaRegistro(proximoId, proximoIndice)
Call CarregaDadosInicial ' INCLUSAO PARA SOLUCAO DE DUPLICIDADE
Call btnUltimo_Click ' INCLUSAO PARA SOLUCAO DE DUPLICIDADE
txtCodigoID = proximoId
lblMensagem.Caption = "Registro salvo com sucesso."
End If