menampilkan data excel di listview

  1. 4 bulan yang lalu

    bagaimana cara menampilkan data yang ada pada sheet excel agar bisa tampil di listview pada userform?

  2. manweljs_

    Mei 17 Terverifikasi + 8.799 Poin
    Di sunting 4 bulan yang lalu oleh manweljs_

    @faizal bagaimana cara menampilkan data yang ada pada sheet excel agar bisa tampil di listview pada userform?

    siapkan aja listviewnya dan datanya kemudian lampirkan disini.
    atau silahkan pelajari dari diskusi Cara menampilkan data pada listbox dashboard

  3. @manweljs_ siapkan aja listviewnya dan datanya kemudian lampirkan disini.
    atau silahkan pelajari dari diskusi Cara menampilkan data pada listbox dashboard

    itu mas, masih lanjutan yang kemarin heheh

  4. manweljs_

    Mei 17 Terverifikasi + 8.799 Poin

    @faizal
    copy paste skrip berikut pada module UserForm :

    Private Sub LoadData()
       Dim li As ListItem
       Dim r, c, n
       Dim lvw As ListView
       Dim sh As Worksheet
       
       Set sh = Sheet1
       Set lvw = Database
       Database.ListItems.Clear
    
       n = sh.Cells(Rows.Count, 1).End(xlUp).Row
    
       For r = 2 To n
          With lvw
             Set li = .ListItems.Add(Text:=sh.Cells(r, 1).Value)
             For c = 2 To 3
                li.ListSubItems.Add Text:=sh.Cells(r, c).Value
             Next c
          End With
       Next r
    End Sub

    kemudian pada UserForm_Initialize tambahkan baris :

    Call LoadData

    kalo berhasil tampilannya seperti ini :

    Listview.PNG

 

atau Mendaftar untuk ikut berdiskusi!