ATENÇÃO NOVOS USUÁRIOS

Se registrou recentemente? Seu cadastro será avaliado e mendiante aprovação, a conta será ativada e você poderá usufruir do fórum. O tempo de avaliação gira em torno de 24 a 48 horas.

Esqueceu sua senha?

Você pode usar o mecanismo de lembrete neste link: Recuperar senha

Você receberá um link de reativação no email cadastrado.

Não recebeu o email? Lembre-se checar o Lixo Eletrônico.

CODIGO PARA DELETAR LINHA LISTBOX

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
itamar
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Seg Mai 03, 2021 5:47 pm

CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por itamar » Ter Mai 04, 2021 1:09 pm

OLA A TODOS
SOU CURIOSO NO RAMO DE VBA, CONSTRUÍ UMA PLANILHA PARA CONTROLE DE ESTOQUE ONDE TRABALHO (PARA USO PESSOAL)
PRECISO DE UM CÓDIGO PARA DELETAR UMA LINHA CARREGADO EM UMA LISTBOX.

SE FOR POSSÍVEL POSTO A PLANILHA AQUI!!
SE ALGUÉM PUDER AJUDAR.
Anexos
PESQUISA.png
PESQUISA.png (90.57 KiB) Exibido 114 vezes



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1458
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por Reinaldo » Ter Mai 04, 2021 1:18 pm

Poderia se algo +/- assim

Código: Selecionar todos

Private Sub CommandButton1_Click()
     Dim i As Integer
    With Me
        For i = 0 To .ListBox1.ListCount - 1
            If .ListBox1.Selected(i) Then
                resposta = MsgBox("Deseja excluir o item: " & .ListBox1.List(i) & "?", vbYesNo + vbQuestion, "Excluir?")
                If vbYes Then .ListBox1.RemoveItem (i)
            End If
        Next i
    End With
End Sub
mais detalhes^:
https://pt.stackoverflow.com/questions/ ... de-listbox
Caso não atenda, forneça maiores detalhes/exemplo/model


Reinaldo
:oops: :D :mrgreen: :geek:

itamar
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Seg Mai 03, 2021 5:47 pm

Re: CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por itamar » Ter Mai 04, 2021 3:02 pm

DA ESSE ERRO AGORA... NESSA LINHA.
ERRO.png
ERRO.png (150.29 KiB) Exibido 105 vezes
ListBox1.RemoveItem (i)



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1458
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por Reinaldo » Qua Mai 05, 2021 10:47 am

Como disse anteriormente:
Caso não atenda, forneça maiores detalhes/exemplo/model


Reinaldo
:oops: :D :mrgreen: :geek:

Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


itamar
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Seg Mai 03, 2021 5:47 pm

Re: CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por itamar » Qua Mai 05, 2021 12:30 pm

Segue anexo da Planilha, caso precise de alguma senha 1234.
Dependendo da situação vou desistir dela .

Grato.
Anexos
Planilha de controle Estoque.rar
(131.19 KiB) Baixado 3 vezes



Avatar do usuário
Reinaldo
Jedi
Jedi
Mensagens: 1458
Registrado em: Sex Ago 01, 2014 4:09 pm
Localização: Garça - SP / SCS - SP

Re: CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por Reinaldo » Qua Mai 05, 2021 2:38 pm

Como seu listbox é "carregado" por RowSource; para excluir a linha e preciso excluir essa linha da planilha;
pois o listbox espelha os dados dela.
Para utilizar o metodo RemoveItem, sua listbox deve se povoada utilizando método AddItem


Reinaldo
:oops: :D :mrgreen: :geek:

itamar
Acabou de chegar
Acabou de chegar
Mensagens: 4
Registrado em: Seg Mai 03, 2021 5:47 pm

Re: CODIGO PARA DELETAR LINHA LISTBOX

Mensagem por itamar » Qua Mai 05, 2021 4:23 pm

Obrigado pela Atenção.



Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


Responder