Notifications
Clear all

Apagar ultimo registro

3 Posts
2 Usuários
0 Reactions
1,134 Visualizações
(@diramos)
Posts: 20
Eminent Member
Topic starter
 

Boa noite.
Estou finalizando minha planilha, e agora surgiu um problema:
Gravei uma macro para apagar o ultimo registro digitado, caso o usuario erre, o problema, é que o se mesmo ficar clicando no botão,
este vai apagando todos os itens e ao encontrar o cabeçalho, vai para última célula da planilha travando-a.
Gostaria de incluir uma mensagem perguntando se deseja excluir o último item(sim ou não).
A planilha possuir tres botões, GRAVAR, APAGAR e VOLTAR
è possível uma pergunta " os dados estão corretos" antes de gravar efetivamente.
Conto mai uma vez com a colaboração.
Obrigado

 
Postado : 01/08/2016 7:16 pm
brunoxro
(@brunoxro)
Posts: 698
Honorable Member
 

Boa noite Diramos,

Sobre as mensagens:
Na macro de Gravar adicionei uma Msgbox com a pergunta "Os dados estão corretos?", se sim a macro é executada caso contrário não.
Na macro de Voltar também adicionei um Msgbox perguntando, você pode analisar melhor no código.

Sobre apagar o último registro do usuário:
Criei um variável global que corresponde ao valor da última linha de cadastro quando se abre o arquivo.
Ela é atualizada quando se abre o arquivo e quando se utiliza a macro do botão Gravar. De acordo com a minha montagem ela apenas vai apagar a última gravação errada, ou seja se você gravar duas vezes consecutivas dados errados o botão Voltar vai apenas apagar o último cadastro.

Por favor confira o código.

att,

 
Postado : 01/08/2016 9:05 pm
(@diramos)
Posts: 20
Eminent Member
Topic starter
 

Obrigado, Bruno

 
Postado : 02/08/2016 7:00 am