Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Navegação entre registros com Listbox

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
calbertole
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Qui Out 08, 2020 9:07 pm

Navegação entre registros com Listbox

Mensagem por calbertole »

Pessoal estou anexando um projetinho no vba excel de cadastro de horários. Como podem ver ele possui duas listbox. Uma que carrega todos os horários (00:00 às 23:59) e outra com os horários já cadastrados. Quando utilizo os botões de navegação "<" e ">" consigo ver na planilha mas não no listbox de "horários cadastrados" somente os campos: textbox, combobox.
Uma outra questão como editar, excluir dados neste código?
Anexos
Modelo de Quadro de Horário.rar
(50.64 KiB) Baixado 159 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.


calbertole
Acabou de chegar
Acabou de chegar
Mensagens: 7
Registrado em: Qui Out 08, 2020 9:07 pm

Re: Navegação entre registros com Listbox

Mensagem por calbertole »

Será que o Webmaster consegue me ajudar?


Avatar do usuário
LaerteB
Colaborador
Colaborador
Mensagens: 96
Registrado em: Qui Out 19, 2017 8:20 am

Re: Navegação entre registros com Listbox

Mensagem por LaerteB »

Boa tarde e bom feriado, @calbertole

Amigo por gentileza quando anexar um arquivo, somente anexe se for um
arquivo exemplo (com o trecho que está com dificuldades) e que não seja
o projeto inteiro (o que colocou se não for o projeto inteiro é uma parte do
seu projeto completo); para não dificultar a analise e os procedimentos para
aqueles membros que querem ajudá-lo...

Uma outra observação é que todos aqui, temos compromissos e ajudamos somente
no nosso tempo livre.

Bem vamos ao que eu alterei e criei para ajudá-lo nas suas questões - em anexo
o arquivo exemplo "Ex Modelo quadro horarios Solucao1 LB - 02-11-2020.zip" - com
todas as alterações já funcionando de acordo, seja abaixo alguns adendos
importantes para a sua analise e apreciação :

Alterei praticamente tudo nos Objetos/Procedimentos:

Código: Selecionar todos

Private Sub btnregatual_Click()
Private Sub btnproxreg_Click()
Em relação ao Objeto/Procedimento:

Código: Selecionar todos

Private Sub UserForm_Initialize()
Inseri um comando que se segue abaixo:

Código: Selecionar todos

   Me.ltcarrega.Selected(0) = True
Agora no Objeto/Procedimento abaixo:

Código: Selecionar todos

Private Sub btneditar_Click()
Coloquei esta linha que estava faltando:

Código: Selecionar todos

linha = 2
Para editar eu criei um botão para liberar os campos de seu formulário, desta forma podes agora
editar como quiser e quando tiver pronto é só clicar no botão "Editar" (comentei a linha que
liberava os campos do seu formulário e inseri o comando que desabilita novamente depois de ter
feito a alteração - obs: deixei comentado o comando que habilitava os campos para ti analisar e
saber que estava com este comando indevido neste botão).

Agora em relação ao botão excluir, tu não tinha feito nada referente a ele, então achei melhor
que tu tentasse fazer por conta própria (para melhorar o seu conhecimento), mas caso tenha
dificuldades ou não consiga aplicar corretamente, pode informar aqui ou melhor criar um
novo Tópico para esta nova questão..

Aguardando sua resposta e seu Feed Back ... se foi útil, coloque um smille :P ...

OBS: por gentileza não esqueça de responder se ficou de acordo como queria,
pois com isso nos dá mais motivação para continuarmos ajudando...

LaerteB :)
Anexos
Ex Modelo quadro horarios Solucao1 LB - 02-11-2020.zip
(65.16 KiB) Baixado 157 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.


Responder