Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

excel2003:popolare listview

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

excel2003:popolare listview

Postdi karug64 » 09/12/11 23:23

Salve a tutti.
Grazie ai vostri consigli e all'aiuto di pcbase, ho cercato di implementare sul mio form l'utilizzo di un listview, ma ho dei problemi di "popolamento" ....
Per provare ho messo sul form sia un listbox che un listview e nel command ho inserito questo codice:

Codice: Seleziona tutto
Private Sub CommandButton2_Click()
Call Carica_tab ' carica un tabulato txt su un foglio excel

' determina quante colonne deve avere il listbox e poi lo popola
' e questo funziona ......
Sheets("Bf").Select
col = Range("A2").CurrentRegion.Columns.Count  ' ' ' '  grazie al forum
ListBox2.ColumnCount = col
ListBox2.RowSource = "Bf!A2:GA3000"

' provo a popolare il listview
' prima da proprieta'->personalizzate->  ho aggiunto MANUALMENTE 20 colonne
Sheets("Bf").Select
ListView1.ListItems.Clear
Riganx = Cells(65536, 2).End(xlUp).Row + 1
    For ciclo = 2 To Riganx
        Set ListItem = ListView1.ListItems.Add(, , Cells(ciclo, 1))
        With ListItem
            .SubItems(1) = Cells(ciclo, 2)
            .SubItems(2) = Cells(ciclo, 3)
            .SubItems(3) = Cells(ciclo, 4)
            .SubItems(4) = Cells(ciclo, 5)
            .SubItems(5) = Cells(ciclo, 6)
            .SubItems(6) = Cells(ciclo, 7)
            .SubItems(7) = Cells(ciclo, 8)
            .SubItems(8) = Cells(ciclo, 9)
            .SubItems(9) = Cells(ciclo, 10)
            .SubItems(10) = Cells(ciclo, 11)
            .SubItems(11) = Cells(ciclo, 12)
            .SubItems(12) = Cells(ciclo, 13)
            .SubItems(13) = Cells(ciclo, 14)
            .SubItems(14) = Cells(ciclo, 15)
       End With
    Next ciclo
end sub


alla fine di questo ciclo il listview resta vuoto .... o almeno cosi' sembra. compare solo la scrolbar laterale e non vedo nulla.
C'e' un sistema per assegnare via codice le colonne ( e le relative proprieta') al controllo come nel listbox ?

Qualcuno puo' aiutarmi ?
Grazie
Office 2010
karug64
Utente Senior
 
Post: 580
Iscritto il: 20/11/11 21:22

Sponsor
 

Re: excel2003:popolare listview

Postdi PcBase » 10/12/11 00:12

Ciao

Visto l'interesse a questo oggetto allego un piccolo esempio da adattare.
Qui col codice Vba si possono aggiungere i titoli e le larghezze di colonna
Solo un esempio
http://www.sendspace.com/file/ejqadz
Windows xp + Office 2003 Ita
Windows8 Office 2013
PcBase
Utente Senior
 
Post: 129
Iscritto il: 24/02/11 23:26

Re: excel2003:popolare listview

Postdi karug64 » 10/12/11 07:48

.
Office 2010
karug64
Utente Senior
 
Post: 580
Iscritto il: 20/11/11 21:22


Torna a Applicazioni Office Windows


Topic correlati a "excel2003:popolare listview":


Chi c’è in linea

Visitano il forum: alfrimpa, patel e 15 ospiti