Tampilkan postingan dengan label Custom Function. Tampilkan semua postingan
Tampilkan postingan dengan label Custom Function. Tampilkan semua postingan

Teknik Ini Bisa Anda Gunakan Untuk Menghitung Jumlah Kata Yang Muncul Dalam Setiap Sel

formula menghitung kata

Sebenarnya sudah banyak tutorial tentang bagaimana cara menghitung jumlah karakter atau kata di Microsoft Excel yang beredar di dunia maya, baik yang menggunakan formula excel, Macro VBA, dan bahkan ada yang menggunakan kombinasi antara keduanya. Semuanya memiliki hasil akhir yang sama, yakni menghitung berapa banyaknya kata tertentu yang muncul dalam sebuah sel.

Dengan hanya menggunakan modal 2 buah formula yang dikombinasikan dengan beberapa operator matematika, kita sudah bisa melihat hasil dari jumlah karakter (huruf) atau kata yang dimaksud. Dan inilah gabungan formula yang saya maksud :
Fungsi Microsoft Excel
=(LEN(A1)-LEN(SUBSTITUTE(A1;"excel";)))/LEN("excel")
Terjemahan dari baris kode di atas secara sederhananya adalah seperti berikut :
Menghitung jumlah karakter yang ada di sel A1 kemudian di kurangi dengan jumlah karakter SELAIN kata yang ingin dicari (termasuk spasi), dan langkah terakhir adalah membaginya dengan panjang karakter atau kata yang diinginkan. Bingung?? bagaimana jika diterjemakan ke dalam skema gambar berikut :
hitung kata

Dari sekian banyaknya situs atau blog yang memposting artikel atau tutorial tentang cara menghitung jumlah kata di excel, beberapa di antaranya menggunakan formula di atas meskipun ada beberapa di antaranya yang menggunakan kombinasi formula yang berbeda - namun tetap menghasilkan nilai yang sama. Dan jika anda memasukkan kata kunci "cara menghitung jumlah kata di excel" di google, anda akan di berikan jawaban atau sekitar 180 ribuan website yang memuat informasi terkait kata kunci yang anda ketikkan dan excelive.com termasuk di dalamnya. Lihat hasil pencarian dengan kata kunci yang saya lakukan berikut
hasil pencarian google

Bagaimana hasilnya jika menggunakan kata pencarian dalam bahasa inggris?!... silahkan anda temukan sendiri jawabannya.

Beberapa paragraf yang saya tulis di atas boleh dikatakan sebagai pembuka dari tutorial inti kita kali ini, dengan tujuan agar anda lebih paham menggunakan kombinasi beberapa formula untuk mendapatkan hasil yang diinginkan. Dan tentu saja saya tidak ingin memberikan atau berbagi sesuatu yang sudah ada dan sangat banyak dibagikan (posting) oleh website lainnya.

Apa yang akan saya share kali ini adalah cara alternatif lain dalam menghitung berapa banyaknya kata atau karakter yang muncul dalam sebuah sel dengan menggunakan Custom Function (UDF - User Defined Function), yakni sebuah fungsi atau formula yang di buat sendiri dengan menggunakan bantuan Macro VBA. Dan berikut ini langkah-langkahnya:
  1. Buka aplikasi Microsoft Excel jika belum aktif
  2. Setelah aplikasi terbuka, silahkan tekan kombinasi tombol Alt+F11 di keyboard anda untuk langsung menuju jendela Visual Basic Editor
  3. Di jendela Visual Basic Editor, awali dengan membuat module baru dengan cara klik menu Insert kemudian klik menu Module
    insert module
  4. Setelah berhasil membuat module baru yang masih kosong, langkah selanjutnya adalah ketikkan (copy-paste aja biar cepat...!) kode berikut ini di dalamnya
    Function Hitung(xRange As Range) As Long
    kata = Application.InputBox("Kata yang ingin di cari", "Cari apa ya?")
    
        For Each xSel In xRange
            hasil = (Len(xSel) - Len(Replace(xSel, kata, ""))) / Len(kata)
        Next xSel
        Hitung = hasil
    End Function
    insert custom function
  5. Tutup jendela Microsoft Visual Basic Editor dengan menekan tombol X yang ada di pojok kanan atas jendela aplikasi ini atau bisa juga menggunakan kombinasi tombol Alt+Q di keyboard anda agar langsung menuju ke aplikasi Microsoft Excel.

Ok, sekarang saatnya kita menggunakan fungsi baru yang tidak di miliki oleh Microsoft Excel yang bernama Fungsi Hitung. Namun sebelum menggunakannya, silahkan tulis beberapa kata atau kalimat di sel A1 atau sel lainnya kemudian silahkan ketikkan formula baru ini di sel B1 atau sel lainnya, dengan syntax penulisan seperti berikut : Fungsi Microsoft Excel
=Hitung(A1)
Dan inilah hasil akhirnya :
udf-hitung kata di excel
Loading...
Sekarang anda sudah mengetahui bagaimana teknik lain untuk menghitung jumlah kata atau karakter yang terdapat di sebuah sel dengan menggunakan fungsi custom. Terimakasih anda sudah berkunjung di portal pembelajaran Microsoft Excel bersama excelive.com. Silahkan bookmark situs ini untuk memudahkan anda ketika mengunjungi kami lain waktu. Gracias

Berhitung dengan InputBox dan Custom Function

berhitung

Syarat utama yang diminta oleh Microsoft Excel dalam memulai sebuah hitungan (baca:mengolah angka) adalah harus mengawalinya dengan sebuah simbol sama dengan (=) untuk setiap masukan. Maka secara otomatis ia akan dibaca sebagai sebuah fungsi yang akan diolah sesuai dengan apa yang ditulis oleh pengguna.



Loading...

Sebagai contoh, ketika pengguna memasukkan sebuah nilai seperti =5*2 maka Microsoft Excel akan langsung mengolah angka-angka tersebut dan akan menghasilkan nilai 10, karena simbol * yang digunakan diantara angka-angka tersebut difungsikan sebagai perkalian. Hal ini pun sama berlakunya ketika seorang pengguna hendak menuliskan sebuah formula, seperti =SUM, =AVERAGE, dan lain sebagainya. Formula-formula tersebut akan berfungsi sebagaimana mestinya jika diawali dengan karakter sama dengan.

Formula Microsoft Excel memang sudah tersedia dan pengguna hanya tinggal memakainya saja sesuai dengan kaidah penulisan yang berlaku. Sementara jika ingin membuat sebuah Formula sendiri (Custom Function) maka seorang pengguna harus menentukan terlebih dahulu beberapa parameter yang dibutuhkan, yang mana hal ini bisa dilakukan dengan menggunakan Macro VBA.

Pembahasan mengenai Custom Function lain sudah pernah dibahas disini, silahkan kunjungi untuk memahami struktur dan cara membuatnya.

Untuk tutorial kali ini kita akan mencoba menggabungkan Custom Function dan InputBox untuk mengolah angka sederhana seperti contoh diatas, dan seperti yang sudah Anda ketahui, baik Custom Function dan InputBox sama-sama harus dibuat menggunakan Macro VBA. Jadi, silahkan Anda aktifkan terlebih dahulu jendela Microsoft Visual Basic Editor dengan cara menekan tombol Alt + F11 di keyboard Anda.

Setelah jendela VBE terbuka, tambahkan sebuah Module baru dan ketikkan baris kode berikut:
Function Hitung()
On Error Resume Next
Dim X As Double
Dim Y As Double

X = InputBox("Masukkan angka pertama", "Masukkan Nomor")
Y = InputBox("Masukkan angka kedua", "Masukkan Nomor")
Hitung = X * Y
End Function

Hitung merupakan sebuah nama dari Formula baru kita, dan usahakan nama dari formula ini tidak sama dengan nama-nama formula yang sudah ada di Microsoft Excel.
download

Penggunaan Formula baru ini cukup sederhana, yakni Anda tinggal mengetikkan =Hitung() di sebuah sel kemudian akhiri dengan tombol Enter untuk langsung menampilkan beberapa jendela InputBox, serta harus menggunakan nilai berupa angka agar operasi ini berhasil.
hitung dengan inputbox

Sekarang Anda sudah berhasil mempelajari bagaimana cara membuat hitungan sederhana dengan menggunakan Custom Function yang dikombinasikan dengan InputBox. Semoga belajar Macro VBA excel bersama excelive untuk edisi ini ada manfaatnya.
Kunjungi kami lain waktu untuk mengetahui kehebatan Microsoft Excel lainnya, See u next time.


Loading...

Membuat Angka Acak Secara Statis

random number

Microsoft Excel telah menyediakan ratusan formula untuk digunakan dalam berbagai keperluan. Sebut saja formula SUM. Salah satu formula andalan dari pengguna Microsoft Excel ini digunakan untuk menjumlahkan isi data berupa angka dalam range tertentu.

Tentu saja formula SUM tidak bisa digunakan jika ingin mencari rata-rata suatu nilai, dan lain sebagainya. Hal ini karena setiap formula yang ada di Microsoft Excel memiliki fungsi yang berbeda antara satu dengan yang lainnya. Akan tetapi pengguna Excel bisa mengkombinasikan antar formula untuk menghasilkan nilai yang diinginkannya.

Salah satu fungsi Microsoft Excel yang akan dibahas dalam Tutorial kali ini adalah, formula RAND. Formula ini digunakan untuk menghasilkan nilai atau angka secara acak yang diistribusikan secara merata.

Menggunakan formula RAND, akan menghasilkan angka acak baru setiap kali terjadi perubahan di lembar kerja, yang mengakibatkan nilai yang dihasilkan tidak akan sama. Meskipun hal ini bisa diatasi dengan cara merubah terlebih dahulu metode penghitungan lembar kerja dari otomatis menjadi manual, yang bisa dirubah melalui menu Excel Option. Akan tetapi, konsekuensinya adalah setiap formula yang tertulis di lembar kerja tidak akan dihitung secara otomatis, dan pengguna harus menekan tombol F9 untuk melalukan hitungan secara manual.

Maka salah satu solusi untuk membuat angka acak secara statis meskipun terjadi perubahan di lembar kerja adalah dengan cara membuat Fungsi Kustom menggunakan Macro VBA.
  1. Tekan tombol pintas Alt + F11
  2. Buat sebuah Module baru, dan masukkan baris kode ke dalamnya
    Function Statis()
          Statis = Rnd()
    End Function
Untuk menggunakan fungsi kustom ini, ketik di sebuah sel seperti berikut
Formula Excel
=Statis()
Maka, nilai acak akan dibuat dan tidak akan berubah meskipun terjadi perubahan di lembar kerja. Lihat tampilan berikut untuk melihat perbedaan formula kustom yang kita buat dengan formula bawaan Microsoft Excel


Untuk menghasilkan nilai acak secara statis antara 0 sampai dengan 100, maka tulis formula seperti berikut :
Formula Excel
=INT(statis()*100))
Sekarang anda sudah berhasil membuat Custom Function untuk menampilkan angka acak secara statis. Semoga belajar Custom Function Macro VBA excel bersama excelive untuk edisi ini ada manfaatnya.
Kunjungi kami lain waktu untuk mengetahui kehebatan Microsoft Excel lainnya, Thanks for visiting.

Loading...

Fungsi Kustom Macro VBA Menghilangkan Huruf Vokal

Membuat Teks Singkatan seperti SMS
Sebagian dari kita mungkin tanpa sengaja menggunakan bahasa-bahasa singkatan, terutama dalam hal pengiriman pesan pendek atau SMS. Entah hanya sekedar ingin mengikuti fenomena yang ada, atau mungkin malas untuk menggunakan tata bahasa yang benar sesuai dengan kaidah penulisan bahasa.

Dalam tips kali ini, saya mencoba untuk 'menghadirkan' nuansa tulisan pesan SMS. Hanya saja bukan menggunakan telepon genggam melainkan menggunakan Aplikasi Microsoft Excel, lebih tepatnya menggunakan sebuah fungsi yang dibuat menggunakan kode VBA.
  1. Seperti biasa, buka jendela Visual Basic Editor yang bisa diakses menggunakan tombol pintas Alt + F11
  2. Klik menu Insert, dan pilih Module untuk membuat sebuah modul baru
  3. Masukkan baris kode berikut ke dalam module yang baru Anda buat
    Function NoVocal(Txt) As String
    Dim i As Long
    NoVocal = ""
    For i = 1 To Len(Txt)
    If Not UCase(Mid(Txt, i, 1)) Like "[AEIOU]" Then
    NoVocal = NoVocal & Mid(Txt, i, 1)
    End If
    Next i
    End Function
  4. Tutup atau minimize jendela Visual Basic Editor
Untuk mengaplikasikan fungsi kustom yang sudah kita buat menggunakan Macro VBA di atas, adalah dengan cara :
  1. Ketik beberapa kata atau kalimat di sembarang sel, sebagai contoh ketik kata 'Selamat Datang' di sel A1
  2. Di sel B1 (atau terserah mau di letakkan di mana hasil singkatan) ketikkan sebuah fungsi seperti berikut
    =NoVocal(A1)
  3. Akhiri dengan menekan tombol Enter atau klik sel lain untuk melihat hasilnya
Lihat hasil akhir dari fungsi kustom yang sudah kita terapkan dalam lembar kerja Microsoft Excel berikut :
membuat singkatan dengan macro VBA

Loading...

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