Selecionar item em listbox multipage
Enviado: 02 Dez 2019 às 17:37
Ola Pessoal... boa tarde a todos!!!
Tenho um multipage preenchido e com duploclick no item do listbox1, seleciono a linha e carrega os dados para as textbox da planilha (isso está ok).
Quero que esse item (por referencia "Cliente TT") seja selecionado e marcado tmb no listbox2 (page2) ficando bloqueado em ambo, ate que seja executada uma proxima açao ou simplemente desmarcar o item no listbox1 com duploclick;
mas mesmo que se navegue entre os listbox, alterne entre um e outro ou clique num outro listbox (page3... e tal) a selecao nao pode ser desmarcada, tem que manter a seleção do item ate que clicamos pra desmarca-la (desmarcando tmb o item no listbox2) ou execute a proxima açao (de exclusao, edicao e tal), mas isso nao vem ao caso agora (ja ta ok tmb).
Outro detalhe... preciso corrigir o erro 70 ( premissão negada ) no codigo do listbox2 na linha: Me.ListBox2.List = vrtDados ; o nosso amigo babdallas criou esse codigo.
anexo exemplo simples.
Conto com o apoio ilustre dos senhores...
Abraço a todos!
Tenho um multipage preenchido e com duploclick no item do listbox1, seleciono a linha e carrega os dados para as textbox da planilha (isso está ok).
Quero que esse item (por referencia "Cliente TT") seja selecionado e marcado tmb no listbox2 (page2) ficando bloqueado em ambo, ate que seja executada uma proxima açao ou simplemente desmarcar o item no listbox1 com duploclick;
mas mesmo que se navegue entre os listbox, alterne entre um e outro ou clique num outro listbox (page3... e tal) a selecao nao pode ser desmarcada, tem que manter a seleção do item ate que clicamos pra desmarca-la (desmarcando tmb o item no listbox2) ou execute a proxima açao (de exclusao, edicao e tal), mas isso nao vem ao caso agora (ja ta ok tmb).
Outro detalhe... preciso corrigir o erro 70 ( premissão negada ) no codigo do listbox2 na linha: Me.ListBox2.List = vrtDados ; o nosso amigo babdallas criou esse codigo.
anexo exemplo simples.
Conto com o apoio ilustre dos senhores...
Abraço a todos!