menampilkan data setelah memilih list

  1. 6 tahun lalu

    permisi agan-agan.. numpang tanya, aku mau tanya dong, bagaimana cara menampilkan data, apabila kita memilih salah satu list, maka data akan keluar, mohon petunjuknya

  2. Di sunting 6 tahun lalu oleh manweljs_

    @Ayu zone

    tanpa vba bisa gak ? terlampir contohnya

  3. bener om, tp yang ku maksud setelah di klik button "pilih" baru muncul om

  4. Di sunting 6 tahun lalu oleh manweljs_

    @Ayu zone

    coba skrip berikut :

    ...
    Dim rng As Range, sel As Range, x As Long
    
    lrow = Sheet1.Range("C" & Rows.Count).End(xlUp).Row
    Set rng = Sheet1.Range("C10:C" & lrow)
    target = Sheet2.Range("C1")
    Sheet2.Range("H9:I" & Sheet2.Range("I" & Rows.Count).End(xlUp).Row).ClearContents
    
    For Each sel In rng
        If sel = target Then
        x = x + 1
        With Sheet2
            .Cells(8 + x, 8) = x
            .Cells(8 + x, 9) = sel.Offset(0, 2)
        End With
        End If
    Next sel
    ...

 

atau Mendaftar untuk ikut berdiskusi!