KONVERSI FORMULA / RUMUS EXCEL KE VBA DENGAN METODE EVALUATE – Belajar Microsoft Excel : Tips, Tricks & Tutorial

KONVERSI FORMULA / RUMUS EXCEL KE VBA DENGAN METODE EVALUATE

Assalamualaikum Warohmatullahi Wabarokatuh

SOdara2 sekaliYan para pembatja jang boediman …. menyambung artikel tentang cara konversi / memindahkan formula / rumus Excel dari Worksheet ke macro VBA yang pernah saya bikin … yang pertama saya bikin artikel WORKSHEET FUNCTION : MANGGIL FUNGSI BAWAAN EXCEL LEWAT MACRO … dan berlanjut ke artikel KONVERSI FUNGSI EXCEL KE VBA [MACRO VBA EXCEL TUTORAL SERIES… pada artikel2 tersebut saya pakai metode  Application.WorksheetFunction  untuk memindahkan formula / rumus Excel dari Cell ke VBA … artikel kali ini akan membahas metode lainnya yaitu metode Application.Evaluate

metode Application.Evaluate menurut saya mungkin akan lebih mudah dipahami daripada menggunakan Application.WorksheetFunction yang ada pada artikel sebelumnya …. kenapa dengan metode ini bisa lebih mudah dipahami ???? … karena dibandingkan dengan metode Application.WorksheetFunction penulisan formula dengan metode Application.Evaluate menurut saya lebih banyak kemiripannya dengan penulisan formula pada Cell Excel … jadi jika sOdara sudah bisa bikin formulanya di Cell … maka menggunakan metode Application.Evaluate untuk formula tersebut dalam VBA sOdara seperti hanya melakukan Copy-Paste saja

Agar lebih mudah dibandingkan … saya ambil contoh Formula / Rumus Excel yang ada pada artikel dengan metode Application.WorksheetFunction  …. dalam artikel tersebut Fungsi utama yang digunakan dalam Formula adalah SUMIF …. mari kita bandingkan antara Formula dalam Cell , VBA dengan WorksheetFunction dan VBA dengan Evaluate … tabel berikut ada pada file contoh SUMIF2VBA_Evaluate.xlsm yang bisa sOdara download gratis dengan ceKlik disini

Contoh 1

Contoh 1 menjumlahkan penjualan pada semua kota dengan syarat penjualannya sebesar 1.500.000

➡  Formula
=SUMIF(Sheet1!D3:D12;1500000)

➡ VBA Worksheet Function
Application.WorksheetFunction.SumIf(Sheets("Sheet1").[D3:D12], 1500000)

➡ VBA Evaluate
Application.Evaluate("=SUMIF(Sheet1!D3:D12,1500000)")

Bisa sOdara2 sekaliYan amati pada  perbandingan di atas … antara syntax Formula dengan Evaluate bisa dikatakan sangat mirip  dibandingkan kemiripan antara Formula dengan Worksheet Function … hampir2 tidak ada bedanya … cuman memindahkan formula yang tadinya ada dalam Cell Worksheet Excel ke macro VBA … bedanya cuman pada tanda pemisahnya saja … karena saya menggunakan Regional Setting Indonesia maka menggunakan tanda pemisah “;” pada formula sedangkan pada VBA karena tidak terpengaruh dengan Regional Setting maka tanda pemisahnya tetap dengan “,

Contoh 2

Contoh 2 mencari jumlah penjualan pada kota Medan … pada tabel diatas terdapat 2 data penjualan kota Medan (nomor 2 dan nomor 8) … yang masing-masing sebesar 6.000.000 dan 3.000.000 sehingga jumlahnya 9.000.000

➡ Formula
=SUMIF(Sheet1!C3:C12;"Medan";Sheet1!D3)

➡ VBA Worksheet Function
MsgBox Application.WorksheetFunction.SumIf(Sheets("Sheet1").[C3:C12], "Medan", Sheets("Sheet1").[D3])

➡ VBA Evaluate
Application.Evaluate("=SUMIF(Sheet1!C3:C12,""Medan"",Sheet1!D3)")

jika kita analisa untuk contoh 2 ini hasilnya juga masih sama … metode Evaluate terlihat lebih mirip … bedanya selain tanda pemisah seperti pada contoh 1 juga pada tanda petik () … pada Evaluate tanda petiknya bertambah dari menjadi “” …. sedangkan pada Worksheet Function terlihat banyak bedanya

Demikian artikel tentang metode Evaluate yang digunakan untuk konversi formula / rumus ke VBA … setelah tahu bedanya dengan WorksheetFunction kira2 sOdara sekarang mau pilih yang mana ????

Sekian …. semoga manpaat dan MDLMDL )

bingung cara downloadnya ??

Baca aja halaman download dengan klik icon di samping

feed , email and my social media

2 Comments

Jika sOdara menemukan sesuatu yang bermanpaat di marih .... silahkan kasih komennya