MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Botão para excluir vários Registros

    Compartilhe
    avatar
    Robystanley
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 48
    Registrado : 21/12/2015

    [Resolvido]Botão para excluir vários Registros

    Mensagem  Robystanley em Qua 06 Abr 2016, 05:50

    Olá Pessoal, gostaria de saber, se tem como selecionar os itens na caixa de listagem e depois apagar os mesmos, ou alguma outra forma de excluir vários registros ao mesmo tempo criando o botão "Excluir"; segue banco com caixa de listagem pronta para teste. Obrigado.

    Link Banco:

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

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9697
    Registrado : 04/11/2009

    Re: [Resolvido]Botão para excluir vários Registros

    Mensagem  JPaulo em Qua 06 Abr 2016, 10:08

    Ola;

    Para fazer isso com segurança, tem de ter um ID na tabela.

    Eu coloquei o ID na tabela.
    Adicionei o ID, na listbox e coloquei em primeiro no SQL (coluna zero), com 0cm para não ficar visivel.

    Adicionei um botão para excluir os multi-selecionados;

    Código:
    Dim v As Variant
        For Each v In caixahq.ItemsSelected
            If MsgBox("Deseja mesmo deletar os registos selecinados ?", vbCritical + vbYesNo, "Delete") = vbYes Then
            CurrentDb.Execute "Delete * From Gibis Where ID = " & caixahq.ItemData(v)
            Else
            Exit Sub
            End If
        Next
        Me.caixahq.Requery
        Me.Requery


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


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

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

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    avatar
    Robystanley
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 48
    Registrado : 21/12/2015

    Re: [Resolvido]Botão para excluir vários Registros

    Mensagem  Robystanley em Qua 06 Abr 2016, 16:58

    Olá Jpaulo;

    Testei o código e já implementei no meu sistema, ficou certinho, muito obrigado mesmo pelo tempo e, ajuda disponibilizada, que Deus continue derramando chuva de bençãos em sua vida, até mais, abraços!!!

      Data/hora atual: Dom 19 Nov 2017, 21:14