Dear All

Saya ingin membuat vlookup dan sumif di VBA ada yang bisa membantu ??

berikut code saya, mohon di koreksi jika ada salah.

Sub group_code_barang()
    Dim result As Variant
    Range("B1").Select
    ActiveCell.FormulaR1C1 = "Group Kode Barang"
    With Range("B2:B10")
    .formula = 
"=If(Iserror(VLookup(A2,master_barang!$A:$E,2,False)),0,VLookup(A2,master_barang!$A:$E,2,False))"
    .FormulaHidden = True
    End With
    Range("B2:B10").Select
    Range("B1").Select
    Selection.AutoFilter
    ActiveWorkbook.Save
End Sub

Sub rp()
    Dim result As Variant
     ' check_for_analysis Macro
     ' check_for_analysis using the VLOOKUP to external file
    Range("G1").Select
    ActiveCell.FormulaR1C1 = "Rp"
    With Range("G2:G10")
    .formula = "=SUMIF(master_barang!A:A,A2,master_barang!F:F)*F2"
    .FormulaHidden = True
    End With
    Range("G2:G10").Select
    Range("G1").Select
    ActiveWorkbook.Save
End Sub

Lalu bagaimanakah code eksekusi otomatisnya ?? Sebelumnya diucapkan terima kasih

Kirim email ke