Boas caros colegas,
Tenho uma situação que não percebo o motivo que acontece com meu ficheiro, pois é o mesmo UserForm e ações de um outro e não acontece o que acontece a este.
Estou a fazer um cadastro de informações (cliente), porem quando carrego em salvar para a plan indica, salva! mas aparece sempre o ultimo item salvo duplicado, ou seja.
Exemplo apos execução:
Cod Nome endereço cidade estado
1 Fulano de Tal Rua A, 13 Teste TT
Fulano de Tal Rua A, 13 Teste TT
Obs.: quando acrescento um novo cadastro a suposta linha duplicada do 1º cadastro passa a ser o 2º cadastro e este é que se acrescenta a tal linha duplicada.
Cod Nome endereço cidade estado
1 Fulano de Tal Rua A, 13 Teste TT
2 Beltrano de Tal Rua ABC, 13 Teste TT
Beltrano de Tal Rua ABC, 13 Teste TT
Gostaria que saber o que esta errado no codigo Salvar que esta a acrescentar em duplicado o novo cadastro.
Segue anexo.
Desde ja obrigado.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Altere a rotina no botão salvar conforme abaixo, as linhas adicionais nessa rotina e que "causam" a duplicidade
Private Sub cmdSalvar_Click()
If txtEmpresa.Enabled = True Then
If Not IsNumeric(lblCod.Caption) = True Then
lsInserir
Sheets("Menu").Activate
Else
lsAlterarStudent
Sheets("Menu").Activate
End If
lsDesabilitar
MsgBox "Registro Salvo!"
End If
Sheets("Menu").Activate
End Sub
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Bom dia!!
Uma outra forma seria...
http://www.sendspace.com/file/aoitow
Att
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Sei não Ale, mas me parece que no seu exemplo continua a falha reportada, inclusive "salva" o duplicado onde o cursor estiver posicionadao.
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel
Boa tarde!!
Confiando na sua resposta (já que o solicitante do poste, iria testar primeiramente sua resposta, que estaria provavelmente correta), eu cabei fazendo e como sempre, sem prestar atenção, e não testado. 
Olá Luciano Santos, reveja com atenção e faça os teste necessários caso contrário o seu problema ainda não tenha sido resolvido.
Att
Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel