MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Excluir varios registros

    Compartilhe

    marcelo3092
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 45
    Registrado : 19/08/2010

    Excluir varios registros

    Mensagem  marcelo3092 em Sex 3 Jun - 13:46

    Boa tarde galera venho mais uma vez tirar uma duvida espero alguém possa me avisar
    Tenho um código num botão que pega o SubTotal e o Numero de parcelas e gera as parcelas sequenciais p que eu queria saber e como posso fazer para tipo se eu gerar as parcelas erradas para excluir e gera de novo tem que excluir as que foi gerada o problema e q tem que ser excluida uma por uma o que eu queria era um botão para excluir todas de uma vez... espero e agradeço a ajuda...

    Private Sub Comando21_Click()
    Dim i, strDetalhe_Calculo As Integer
    Dim strValor As Currency
    Dim strData_Parcela As Date

    strDetalhe_Calculo = [Forms]![Alunos]![Qtda_Mes]
    strValor_Parcela = [Forms]![Alunos]![ValorR$] / strDetalhe_Calculo
    strData_Parcela = [Forms]![Alunos]![Data_Parcela]

    If NParcela = "" Or IsNull(NParcela) Or NParcela = "0" Then
    For i = 1 To strDetalhe_Calculo
    DoCmd.GoToRecord , , acNewRec
    Me.NParcela = i
    Me.Valor_Parcela = strValor_Parcela
    Me.Vencimento = DateAdd("m", i - 1, strData_Parcela)
    Next
    Else
    MsgBox "Já foram calculadas as prestações desta nota." _
    & " Para calcular novamente tem que excluir as Atuais.", vbCritical, "Erro"
    End If
    Voltar ao Topo

    FabioPaes
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2317
    Registrado : 14/08/2013

    Re: Excluir varios registros

    Mensagem  FabioPaes em Sex 3 Jun - 15:43

    Delete todas os registros da tabela ContaReceber referente a venda xxx

    Ex:

    'Coloque no Botão excluir Parcelas, ajuste com os nomes de campos e tabela
    Currendb.Execute "DELETE * FROM tbContaReceber WHERE COdVenda = " & Me.CodVenda & ""
    Me.Recalc


    Dessa forma irá filtrar e apagar so os registros da Venda que estiver na tela, compara com o Campo do formulario de nome CodVenda.


    Obs: Faça o teste em BD de Backup!


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

    marcelo3092
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 45
    Registrado : 19/08/2010

    Excluir registro

    Mensagem  marcelo3092 em Sab 4 Jun - 23:25

    Boa noite amigo fabio tentei usa seu código porem da erro em tempo de execução 424. vou te explicar os dois casos bem certim pra vc me entende

    tenho um formulario alunos e dentro desse formulario tenho controle de guias e tem uma com o nome calculos e dentro dela ta o sub formulário que gera parcelas com o nome Detalhe_Calculo e no rodape desse formulario o botão de gerar parcelas o que eu queria era criar um botão para poder apagar as parcelas geradas. seu código tentei mais não deu
    Currendb.Execute "DELETE * FROM Detalhe_Calculo WHERE Cód_Aluno = " & Me.Cód_Aluno & ""
    Me.Recalc

    Outro probleminha e em outro formulario meu no vendas eu tenho o botão de excluir vendas porem se eu excluir a venda o Detalhe_Venda que e o sub formulario que adiciona os produtos fica la mais sem venda então o estoque n retorna pq ele ainda esta preenchido acredito que os problemas são parecido queria que no botões excluir venda antes de excluir a venda apagasse primeiro o sub formulario so que esse formulario e baseado em uma consulta Detalhe_Venda_Consulta.

    se vc puder me ajudar agradeço.

    FabioPaes
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 2317
    Registrado : 14/08/2013

    Re: Excluir varios registros

    Mensagem  FabioPaes em Dom 5 Jun - 8:38

    Amigo, o erro que deu provavelmente e com os nomes dos campos, Poste aqui seu BD.

    A outra questao é o Relacionameno. Deve marcar a caixa : Propagar exclusões...

    [Você precisa estar registrado e conectado para ver esta imagem.]
    Assim ao excluir o Registro do formulario principal, ele leva o registro relacionado do subformulario.


    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!

    marcelo3092
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 45
    Registrado : 19/08/2010

    Excluir registro

    Mensagem  marcelo3092 em Dom 5 Jun - 10:15

    Bom dia amigo ta ai o db

    [Você precisa estar registrado e conectado para ver este link.]

    Bom acho que vc entendeu né o problema e no formulário alunos na aba calculo vc coloca a quantidade de parcelas e clica no botão gerar
    blz ai o q eu queria era o botão para excluir todas elas de uma vez caso o usuario gere as parcelas erradas.

    e no formulário vendas como te falei no botão excluir queria que primeiro ele deleta se os produtos primeiro..

    login marcelo
    senha 123

    desde ja agradeço

      Data/hora atual: Qua 7 Dez - 14:14