Problemas para manipular um ListBox com multipla escolha.

[José Ricardo]

Olá boa tarde... Estou começando a programar em VBA agora e não tenho nehma pratica, peço que se puderem me ajudem por favor.

É o seguinte estou usando um listbox direto na planilha do excel, e este listbox guarda uma lista de projetos que uso para gerar relatórios.Até então funcionava da seguinte maneira

fiz o código abaixo:

Plan5.Cells(12, 11) = ListBox1.Value

e ele setava o valor escolhido no listbox na célula k12 da planilha e assim eu conseguia gerar o meu relatório.

Porem agora estou usando a propriedade .1-fmmultiselectmulti e ele não reconhece.

Quando seleciono mais de um item ele não seta mais a célula K12 com o valor selecionado.

Desde já agradeço pela ajuda.

[webmaster]

José,

Faz todo o sentido. Uma vez que o ListBox, depois da propriedade SelectionMode alterada com multi-seleção, deixe de ter a propriedade Value como sendo válida, já que agora o controle pode ter mais de um valor selecionado. No caso, é preciso mudar a lógica. O código abaixo coloca na janela de verificação imediata os itens selecionados em um ListBox:

Código: Selecionar todos

Private Sub ImprimeSelecionados()
For i = 1 To ListBox1.ListCount
If ListBox1.Selected(i – 1) Then
Debug.Print ListBox1.List(i – 1) & ” selecionado”
End If
Next
End Sub

Siga esta mesma lógica para obter os itens selecionados da sua lista.

Espero que ajude. Abraços