Menulis Formula Menggunakan Macro VBA

Menulis Formula dengan Macro VBA

Selama ini mungkin kita sudah terbiasa menggunakan Formula Microsoft Excel dalam lembar kerja untuk mengolah data. Sebut saja Formula yang sangat familiar dan yang sering kita gunakan seperti; SUM, AVERAGE, Count, dan yang lainnya.

Tapi siapa sangka jika Formula yang biasa kita gunakan dilembar kerja, ternyata bisa juga ditulis menggunakan kode VBA. Syntax penulisan formulanya pun 100% sama, hanya saja karena Formula ini akan ditulis menggunakan kode, maka jelas ada sedikit perbedaan. Apa saja perbedaanya serta bagaimana membuat dan menulis Formula Microsoft Excel menggunakan Macro VBA ?

Lihat perbedaan penulisan berikut:

  1. =SUM(A1:A5)
  2. Application.WorksheetFunction.Sum(Range("A1:A5"))
Kedua penulisan formula di atas memiliki fungsi yang sama, yakni menjumlahkan data yang ada di range A1 hingga range A5, hanya saja penempatannya yang berbeda.
=SUM(A1:A5) ditulis di lembar kerja, sementara Application.WorksheetFunction.Sum(Range("A1:A5")) ditulis di jendela Visual Basic, atau yang kita kenal dengan Macro VBA.

Bagaimana menggunakannya?
Saya yakin kalau untuk menulis formula SUM di lembar kerja, Anda sudah sangat terbiasa dan sangat mahir melakukannya. karena tinggal menuliskan di sebuah sel yang Anda inginkan untuk melihat hasil akhirnya.
Akan tetapi, untuk menggunakan formula SUM ini menggunakan Macro VBA, ada beberapa tahap yang harus dilakukan, antara lain:
  1. Pastikan dalam lembar kerja Anda sudah mengisikan nilai di range A1 hingga A5
  2. Tekan tombol Alt+F11 untuk menuju jendela Microsoft Visual Basic Editor
  3. Tambahkan sebuah module baru dengan cara 🖰 menu Insert dan pilih Module
  4. di jendela penulisan kode, mulailah mengetik beberapa baris kode berikut
    Sub formulaSUM() 
    dim a as variant    
    a = Application.WorksheetFunction.Sum(Range("A1:A5"))    
    msgbox a    
    End Sub
  5. Tekan tombol F5 atau ikon yang ada di standard toolbar untuk melihat hasilnya
Penjelasan singkat dari Macro VBA di atas
formulaSUM
adalah Judul dari kode VBA, dimana nama judul harus unik atau tidak boleh ada yang sama dalam Projek VBA
Dim a
adalah sebuah deklarasi variabel yang akan digunakan
Variant
adalah sebuah tipe data yang dapat berisi angka, huruf, atau tanggal
Application.WorksheetFunction.Sum(Range("A1:A5"))
adalah sebuah baris utama kode VBA untuk kasus ini
Sum(Range("A1:A5"))
Jika dalam lembar kerja ketika kita menuliskan A1:A5, maka hal ini berarti sel yang terpilih adalah sel A1 hingga sel A5 atau kita menyebutnya dengan istilah range.
Dalam penulisan kode VBA, dengan menuliskan baris A1:A5 saja hanya akan menghasilkan perintah error (debug), oleh karena dari itu untuk mengartikan range A1:A5 maka harus ditulis secara lengkap.
msgbox a
adalah sebuah kotak pesan yang menginformasikan hasil dari formula SUM menggunakan Macro VBA

Model penulisan lain untuk kasus ini, bisa juga ditulis seperti berikut:
Sub formulaSUM()
Dim Range_X As Range
Dim HSL As Variant
Set Range_X = Worksheets("Sheet2").Range("A1:A3")
HSL = WorksheetFunction.Sum(Range_X)
MsgBox HSL
end sub

Silahkan pilih mana yang Anda suka.

Loading...

Tidak ada komentar:
Write komentar

Our Services


design

all the design of each tutorial has passed the test for excel 2007 up

installation

every each codes on this site are provided "as is" and are easy to install

youtube

in order to facilitate you in learning excel, you can visit our channel here

download

to complete all excel lessons, we have provided a download link for you

Contact Us


EXCELIVE.com
is a blogger resources site who provides
best excel tutorial based on daily needs.
The main mission of excelive is to share
our little experience in excel
to deliver best time killer for your excel issues.
Singhasari Malang 65153
East Java

Interested for our works and services?
Get more of our update !

end of page