Pada artikel sebelumnya sudah dibahas fungsi if then else pada Excel vba macro, kita lanjutkan lagi. Kali ini admin akan membahas coding yang penting juga untuk dipelajari yaitu fungsi dari Looping Excel VBA Macro.
Looping yaitu merupakan statment perintah yang digunakan melakukan perulangan sampai batas tertentu sesuai yang diinginkan.
Loop For
Sebagai contoh kita ingin menuliskan kalimat secara berulang sepuluh kali, tentunya kurang praktis kalau menulis perintah/koding berulang-ulang sebanyak sepuluh kali. Contoh lain kita akan melakukan penjumlahan berulang secara beruntut sepuluh kali.
Dengan fungsi looping ini kita cukup menuliskan koding sekali maka perintah perulangan berapapun bisa kita kerjakan hanya dengan sekali klik/printah. Berikut ini beberapa fungsi looping yang bisa digunakan:
Buatlah terlebih dahulu dari menu developer sebutah button/tombol
- Looping For >>> Next
Fungsi ini merupakan perulangan yang batas diketahui diawal yang bisa kita tentukan.
Contoh penulisannya :
Sub Button1_Click()
For i = 1 To 10
Range(“B” & i).Value = i
Next i
End Sub
(ket : Pada Range “B” & i artinya kolom B baris i nilainya akan melakukan looping/pengulangan sampai sepuluh kali, hasilnya bilangan berurut seperti gambar diatas)
- Looping Do >>> While
Perulangan yang memilki kondisi, apabilia syarat terpenuhi barulah program akan menghentikan perintahnya. Penggunaannya sama pada diatas hanya beda penulisan koding.
Contoh:
Sub Button1_Click()
Dim i As Integer
i = 1
Do
Range(“B” & i).Value = i
i = i + 1
Loop While i <= 10
End Sub
- Do >>> Loop Until
Hampir sama dengan yang Do >> While, statement perulanggannya akan berhinti jika kondisi telah terpenuhi.
Contohnya :
Sub Button1_Click()
Dim i As Integer
i = 1
Do
Range(“B” & i).Value = i
i = i + 1
Loop Until i > 10End Sub
(ket perulangan dengan penjumlahan i +1 dimana loop akan berhenti jika kurang dari 10, hasilnya sama bilangan urut seperti gambar diatas).
Contoh penerapannya yaitu pada pembuatan tombol print otomatis
Selamat mencoba, Terimakasih semoga bermanfaat.
Penjabarannya ringan dan lugas saya langsung mudeng.. Manteb..
makasih
ternyata banyak sekali yang belum saya ketahui dari exel ini..
tks mas artikelnya menambah wawasan…
iya mas Arif ternyata excel itu banyak sekali rumus dan bisa ditambahkan koding vba, saya juga masih belajar untuk mendalaminya. Sama-sama
Salam, Mas Edi kalau tabel yang kontennya adalah teks yang optional dan berulang, misalnya laporan harian pekerjaan (logbook) contoh macronya gimana mas? Makasih sebelumnya
maaf mas mau tanya, maklum saya masih sangat awam
kegunaan “for” dan “next” disitu untuk apa y?
kenapa tidak ditulis i = 1 to 10 saja?
mohon pencerahannya mas