Vba: cara menghitung deviasi standar rentang

Anda dapat menggunakan sintaks dasar berikut untuk menghitung standar deviasi nilai dalam suatu rentang menggunakan VBA:

 SubStDevRange ()
    Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub

Contoh khusus ini menghitung deviasi standar nilai dalam rentang B2:B11 dan menetapkan hasilnya ke sel D2 .

Jika Anda ingin menampilkan deviasi standar nilai dalam kotak pesan, Anda dapat menggunakan sintaks berikut:

 SubStDevRange ()
    'Create variable to store standard deviation of values
    Dim stdev As Single
    
    'Calculate standard deviation of values in range
    stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Standard Deviation of Values in Range: " & stdev 
End Sub

Contoh berikut memperlihatkan cara menggunakan masing-masing metode ini dalam praktik dengan himpunan data berikut di Excel yang berisi informasi tentang berbagai pemain bola basket:

Contoh 1: Hitung simpangan baku rentang menggunakan VBA dan tampilkan hasilnya dalam sel

Misalkan kita ingin menghitung simpangan baku dari nilai pada kolom poin dan menampilkan hasilnya pada sel tertentu.

Kita dapat membuat makro berikut untuk melakukan ini:

 SubStDevRange ()
    Range(" D2 ") = WorksheetFunction.StDev(Range(" B2:B11 "))
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Perhatikan bahwa sel D2 berisi nilai 11.93734 .

Artinya simpangan baku nilai pada kolom poin adalah 245.

Contoh 2: Hitung deviasi standar rentang menggunakan VBA dan tampilkan hasilnya di kotak pesan

Misalkan kita ingin menghitung deviasi standar dari nilai di kolom poin dan menampilkan hasilnya di kotak pesan.

Kita dapat membuat makro berikut untuk melakukan ini:

 SubStDevRange ()
    'Create variable to store standard deviation of values
    Dim stdev As Single
    
    'Calculate standard deviation of values in range
    stdev = WorksheetFunction.StDev(Range(" B2:B11 "))
    
    'Display the result
    MsgBox " Standard Deviation of Values in Range: " & stdev 
End Sub

Saat kami menjalankan makro ini, kami menerima keluaran berikut:

Kotak pesan memberitahu kita bahwa standar deviasi dari nilai dalam rentang B2:B11 adalah 11.937 .

Perhatikan bahwa dalam contoh ini, kami menghitung deviasi standar nilai dalam rentang B2:B11 .

Namun, jika Anda ingin menghitung standar deviasi nilai di seluruh kolom, Anda dapat mengetikkan B:B .

Ini akan menghitung jumlah nilai untuk setiap sel di kolom B.

Catatan : Anda dapat menemukan dokumentasi lengkap metode StDev VBA di sini .

Sumber daya tambahan

Tutorial berikut menjelaskan cara melakukan tugas umum lainnya di VBA:

VBA: Cara menghitung nilai rata-rata rentang
VBA: Cara menghitung jumlah baris dalam jangkauan
VBA: Cara menulis fungsi SUMIF dan SUMIFS