Notifications
Clear all

listview duplicando colunas!

3 Posts
2 Usuários
0 Reactions
1,013 Visualizações
(@rilton)
Posts: 232
Estimable Member
Topic starter
 

Olha eu mais uma vez aqui com um problema,
Possuo no meu formulário de pesquisa uma listview que carrega os dados de acordo com os critérios estabecidos, porém quando eu clico no botão filtrar, o meu listview duplica as colunas, e se eu, novamente clicar em filtrar, ele duplica ainda mais as colunas e assim sucessivamente. A reposta para esse problema pode ser até simples, mas para uma pessoa noob como eu, a mesma foge dos meus conhecimento. Conto com a colaboração de quem entende do assunto.
Segue em anexo a planilha.
Obrigado.

 
Postado : 27/09/2012 8:55 am
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Acrescente no inicio da sub populalist.. a "rotina" para limpar-la primeiro. Deverá funcionar.

Private Sub PopulaListBox(ByVal Servico As String, _
                          ByVal Tiposervico As String, _
                          ByVal DataInicial As String, _
                          ByVal DataFinal As String)
'Limpa lista
 lstLista.ColumnHeaders.Clear 'Clear the Column Headers
 lstLista.ListItems.Clear
        With lstLista
            .Gridlines = True
            .View = lvwReport
        End With

    On Error GoTo TrataErro.......

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 27/09/2012 9:41 am
(@rilton)
Posts: 232
Estimable Member
Topic starter
 

Caraca, Muito obrigado Reinaldo, sua resposta funcionou perfeitamente

 
Postado : 27/09/2012 10:22 am