Rumus Stratified Sampling Otomatis – Dalam dunia survei dan penelitian, teknik stratified sampling atau pengambilan sampel berstrata sangat penting untuk memastikan representasi yang proporsional dari setiap kelompok dalam populasi. Terutama ketika populasi dibagi berdasarkan kategori seperti wilayah, usia, jenis kelamin, atau dalam contoh kita — alamat tinggal. Artikel ini akan membimbing Anda secara lengkap tentang cara membuat Rumus Stratified Sampling Otomatis menggunakan Microsoft Excel dan VBA.
Apa Itu Stratified Sampling?
Menurut Sugiyono (2022), stratified sampling adalah teknik pengambilan sampel di mana populasi dibagi terlebih dahulu ke dalam strata-strata tertentu, lalu diambil sampel secara acak dari setiap strata. Hal ini penting agar setiap kelompok dalam populasi memiliki keterwakilan yang seimbang dalam survei.
Dalam Excel, kita dapat mengotomatisasi proses ini dengan Rumus Stratified Sampling Otomatis berbasis makro (VBA) untuk efisiensi dan akurasi.
Studi Kasus: Survei Berdasarkan Alamat
Lihat contoh tabel “Data” pada lembar kerja Excel, di mana data peserta survei dicantumkan dengan kolom seperti No. Urut, Nama Lengkap, Usia, dan Alamat. Di sampingnya, terdapat tabel “Jumlah Sampel” yang menunjukkan berapa banyak sampel yang harus diambil dari setiap blok (alamat).
Misalnya:
- Blok Minggu: 6 responden
- Blok Senin: 3 responden
- Blok Rabu: 6 responden, dan seterusnya
Tujuan kita adalah mengambil jumlah sampel sesuai ketentuan dari masing-masing blok secara acak dengan Rumus Stratified Sampling Otomatis.
Langkah-Langkah Praktis
1. Siapkan Data Anda
Buat dua tabel di Excel:
- Tabel utama berisi data populasi (nama, usia, alamat)
- Tabel pendukung berisi stratum dan jumlah sampel yang diinginkan
Pastikan data berada di sheet bernama Data seperti contoh berikut:
Dan untuk menampung hasilnya (output) buat di sheet berbeda dan beri nama “Stratified” dengan format isi sebagai berikut:
2. Gunakan Rumus Stratified Sampling Otomatis dengan VBA
Buka Editor VBA (tekan Alt + F11
) – insert >> modul, kemudian masukkan kode Rumus Stratified Sampling Otomatis berikut:
Sub StratifiedSamplingByAlamat()
Dim wsData As Worksheet
Dim wsOutput As Worksheet
Dim lastRow As Long
Dim dict As Object
Dim i As Long
Dim alamat As Variant
Set wsData = ThisWorkbook.Sheets("Data")
Set wsOutput = ThisWorkbook.Sheets("Stratified")
Set dict = CreateObject("Scripting.Dictionary")
lastRow = wsData.Cells(wsData.Rows.Count, "B").End(xlUp).Row
For i = 2 To lastRow
alamat = Trim(wsData.Cells(i, "E").Value)
If alamat <> "" Then
If Not dict.exists(alamat) Then
dict.Add alamat, New Collection
End If
dict(alamat).Add i
End If
Next i
Dim outputRow As Long: outputRow = 3
Dim col As Collection
Dim usedIndexes As Object
Dim randIndex As Long
Dim sampleSize As Long
Randomize
wsOutput.Range("B3:E" & wsOutput.Rows.Count).ClearContents
For Each alamat In dict.Keys
Set col = dict(alamat)
sampleSize = GetSampleSizeFromRange(alamat, wsData.Range("G3:H8"))
If sampleSize > 0 Then
Set usedIndexes = CreateObject("Scripting.Dictionary")
For i = 1 To Application.Min(sampleSize, col.Count)
tryAgain:
randIndex = Int(Rnd() * col.Count) + 1
If Not usedIndexes.exists(randIndex) Then
usedIndexes.Add randIndex, True
Dim rowNum As Long
rowNum = col(randIndex)
wsOutput.Cells(outputRow, "B").Value = wsData.Cells(rowNum, "B").Value
wsOutput.Cells(outputRow, "C").Value = wsData.Cells(rowNum, "C").Value
wsOutput.Cells(outputRow, "D").Value = wsData.Cells(rowNum, "D").Value
wsOutput.Cells(outputRow, "E").Value = wsData.Cells(rowNum, "E").Value
outputRow = outputRow + 1
Else
GoTo tryAgain
End If
Next i
End If
Next alamat
MsgBox "Stratified sampling berdasarkan alamat selesai!", vbInformation
End Sub
Function GetSampleSizeFromRange(ByVal alamat As String, ByVal rng As Range) As Long
Dim i As Long
For i = 1 To rng.Rows.Count
If Trim(rng.Cells(i, 1).Value) = alamat Then
GetSampleSizeFromRange = rng.Cells(i, 2).Value
Exit Function
End If
Next i
GetSampleSizeFromRange = 0
End Function
Berikut penampakannya dalam modul:
3. Jalankan Makro
Setelah menyalin Rumus Stratified Sampling Otomatis tersebut ke editor VBA, kembali ke Excel, tekan Alt + F8
, pilih StratifiedSamplingByAlamat
, lalu klik Run.
Data hasil sampling akan otomatis muncul di sheet Stratified, sesuai proporsi yang ditentukan pada tabel jumlah sampel. Berikut hasilnya:
4. Analisis Hasil
Setelah menjalankan Rumus Stratified Sampling Otomatis, Anda akan mendapatkan daftar responden terpilih secara acak namun tetap terdistribusi secara proporsional berdasarkan stratum alamat. Ini merupakan teknik yang sangat berguna dalam survei sosial, pemasaran, maupun akademik.
Cara Menghitung Jumlah Sampel Proporsional per Alamat (Strata)
Sebelum kita membuat Rumus Stratified Sampling Otomatis, kita harus menghitung jumlah total populasi dan jumlah total sampel yang ingin diambil. Lalu, kita hitung proporsi setiap strata dan kalikan dengan total sampel.
Rumus Proporsional Stratified Sampling
Misalnya kita ingin mengambil 30 sampel dari total populasi 100 orang yang tersebar di berbagai alamat (untuk jumlah sampel yang valid dengan rumus bisa baca di SINI). Maka rumus untuk tiap alamat (strata):
=ROUND((Jumlah Populasi Strata / Total Populasi) * Total Sampel; 0)
Contoh Praktis di Excel:
Misalkan Anda memiliki tabel jumlah populasi per alamat seperti berikut:
Dan total populasi = 100 orang. total sampel = 30 orang.
Untuk menghitung jumlah sampel dari masing-masing alamat:
=ROUND(K3 / 100 * 30; 0)
Uraian untuk K3:
- K3 berisi jumlah populasi pada “Blok Minggu”
- 100 adalah total populasi
- 30 adalah jumlah total sampel yang diinginkan
Lakukan ini untuk semua baris alamat, maka Anda akan dapat jumlah sampel per alamat yang proporsional.
Jika Total Populasi Berubah Dinamis
Agar lebih otomatis, ganti nilai 100 dengan SUM($B$2:$B$6)
dan total sampel (30) dengan sel yang menyimpannya, misal sel D1
:
=ROUND(K3 / SUM($K$3:$K$8) * 30; 0)
Letakkan rumus tersebut di kolom Jumlah Sampel, dan drag ke bawah.
Integrasi ke Dalam Sistem Sampling Otomatis
Anda bisa menambahkan kolom ini di samping data alamat pada sheet Excel, lalu referensikan kolom ini di makro VBA untuk Jumlah Sampel
, seperti pada kode sebelumnya:
sampleSize = GetSampleSizeFromRange(alamat, wsData.Range("G3:H8"))
Bagian H8
bisa Anda ganti sesuai panjang data alamat dan kolom jumlah sampel otomatis.
Pentingnya Stratifikasi dalam Survei
Dalam jurnal penelitian terbitan Journal of Statistical Planning and Inference (2023), Lee dan Brown menyatakan bahwa “Stratified random sampling not only improves precision but also helps reduce variance when compared to simple random sampling, especially in heterogeneous populations.” (Lee & Brown, 2023).
Demikian pula, dalam buku Modern Survey Sampling oleh Kim dan Zhao (2022), disebutkan bahwa pengambilan sampel berlapis sangat penting untuk memastikan bahwa analisis inferensial dapat merefleksikan kondisi nyata populasi dengan lebih akurat (Kim & Zhao 45).
Kelebihan Rumus Stratified Sampling Otomatis
Berikut manfaat penggunaan rumus ini:
- Efisiensi Waktu – Menghindari penghitungan manual untuk setiap strata.
- Keakuratan – Menghindari bias pemilihan sampel.
- Replikasi Mudah – Dapat digunakan berulang dengan data berbeda.
- Transparan dan Terbuka – Proses dapat ditelusuri ulang.
Penutup
Pembuatan Rumus Stratified Sampling Otomatis dalam Excel membantu para peneliti dan praktisi untuk menyeleksi sampel dengan cepat dan akurat. Dengan teknik ini, Anda tidak hanya menghemat waktu, tetapi juga meningkatkan kualitas data yang dikumpulkan.
Dengan menambahkan perhitungan jumlah sampel otomatis berdasarkan total populasi dan proporsi strata, proses stratified sampling jadi semakin akurat dan dinamis. Anda tak perlu lagi menghitung manual tiap kali data berubah.
Sebagai peneliti, penting bagi Anda untuk memahami bahwa sampel yang baik bukan hanya acak, tetapi juga representatif. Gunakanlah pendekatan ini untuk berbagai jenis survei di masa mendatang.
Download Template Gratis
Bagi Anda yang ingin mencoba teknik ini secara langsung, kami telah menyiapkan template gratis yang dirancang khusus untuk membantu Anda mempraktikkan Langkah Membuat Rumus Stratified Sampling Otomatis untuk Sample Survei ini. File Excel bisa didownload melalui tautan berikut:
Atau juga jika ingin mempelajari langkah demi langkah secara visual, bisa kunjungi Youtube Channel Depot Excel. Di sana teman-teman akan melihat bagaimana rumusnya bekerja. Semoga bermanfaat!
Daftar Pustaka
- Kim, Sunghee, dan Xia Zhao. Modern Survey Sampling. Springer, 2022.
- Lee, Charles, dan Trevor Brown. “Improving Survey Estimations with Stratified Random Sampling Techniques.” Journal of Statistical Planning and Inference, vol. 195, 2023, pp. 87–101.
- Sugiyono. Metode Penelitian Kuantitatif, Kualitatif, dan R\&D. Alfabeta, 2022.
0 Komentar