Total textbox dari listview

  1. 3 bulan yang lalu

    selamat sore master, ada yang bisa bantu untuk memberikan contoh membuat coding total yang ada di textbox dari data listview seperti yang saya kirim berikut.

    mohon bantuanya ya master!

    @isroji ...ada yang bisa bantu untuk memberikan contoh membuat coding total yang ada di textbox dari data listview seperti yang saya kirim berikut....

    ada banyak caranya, salah satunya:

    Private Sub UserForm_Initialize()
    TextBox1.Value = Total 'sesuaikan nama texboxnya
    End Sub
    
    Function Total()
    Dim rng As Range, x As Long
    With Sheet1 'sesuaikan sheetnya
    x = .Range("A" & Rows.Count).End(xlUp).Row
    Set rng = .Range("A2:A" & x) 'sesuaikan kolom yang mau di sum
    Total = WorksheetFunction.Sum(rng)
    End With
    End Function

  2. manweljs_

    Apr 16 Terverifikasi Jawaban Terpilih + 8.798 Poin

    @isroji ...ada yang bisa bantu untuk memberikan contoh membuat coding total yang ada di textbox dari data listview seperti yang saya kirim berikut....

    ada banyak caranya, salah satunya:

    Private Sub UserForm_Initialize()
    TextBox1.Value = Total 'sesuaikan nama texboxnya
    End Sub
    
    Function Total()
    Dim rng As Range, x As Long
    With Sheet1 'sesuaikan sheetnya
    x = .Range("A" & Rows.Count).End(xlUp).Row
    Set rng = .Range("A2:A" & x) 'sesuaikan kolom yang mau di sum
    Total = WorksheetFunction.Sum(rng)
    End With
    End Function

  3. terimakasih banyak codingnya master,,

 

atau Mendaftar untuk ikut berdiskusi!