Perkalian yang saya maksud disini akan lebih mudah apabila saya contohkan langsung berupa gambar di Excel. Baiklah perhatikan contoh kasus perkalian antara harga barang dan jumlah item yang akan dikalikan sehingga menjadi sebuah hasil Jumlah Total.
Nah, perhatikan gambar diatas saya akan mencoba mengkalikan antara kolom E dengan kolom F yaitu jumlah dengan harga dan hasilnya akan ditaruh pada kolom G yaitu Total. Biasanya saya bahkan Anda juga akan menggunakan rumus perkalian secara umum dengan formula =E5*F5 namun disini saya akan mencoba dengan menggunakan coding.
Anda bisa membuat satu buah module dengan Sub Perkalian dan berikut contoh sederhana untuk menyelesaikan perkalian dengan macro diatas.
Sub PerintahKalikan()
Dim i As Integer
For i = 5 To 7
If Range("E" & i).Value <> "" Then
Range("G" & i) = Range("E" & i) * Range("F" & i)
End If
Next i
End Sub
Kita definisikan bahwa i sebagai integer kemudian saya akan membuat defisini i menjadi 5-7 yang nantinya akan dijadikan sebagai baris ke lima sampai ke-7 kemudian kita coba membuat sebuah kondisi apabila range E5, E6, E7 tidak bernilai "" atau Kosong maka D5, G6, G7 akan diisi dengan perkalian antara E5, E6, E7 dikali dengan F5, F6, F7
Karena ini sifatnya array maka untuk mempermudah atau mempersingkat coding dibuat For Next seperti contoh diatas.
Langkah berikutnya kita akan membuat sebuah tombol dengan CommandButton caranya sudah pernah saya bahas sebelumnya silakan cari artikel dalam blog excel-id ini pasti ketemu deh.
Setelah Anda panggil Assign Macronya silakan akhiri dengan tombol OK dan coba test hasil coding Anda dan perhatikan hasilnya
Jreng, hasilnya sudah OK jumlah total sudah terisi otomatis dengan hasnya mengklik tombol "Kalikan" Gimana apakah Anda juga sama hasilnya dengan saya? Silakan comentar ya.
Semoga bermanfaat dan selamat mencoba.
0 Response to "Function Cara Perkalian Array Lebih Cepat Dengan Excel Macro #Rumus Ajaib"
Post a Comment