VBA Bir Dizi Tam Sayının Ortalamasını Bulma

164 Okunma VBA

"VBA" Programlama dilinde "Bir Dizi Tam Sayının Ortalamasını Bulma" ile ilgili örnek kod aşağıda belirtilmiştir. 

Sub Main()
    Dim count As Integer
    Dim sum As Single
    count = InputBox("Sayıların adetini girin:")
    For i = 1 To count
        x = InputBox("Bir tamsayı girin:")
        sum = sum + x
    Next i
    avg = sum / count
    MsgBox "Ortalama: " & avg
End Sub
Dizi Tamsayı Array Ortalama Sayı VBA

İlginizi Çekebilir

VBA Bir Sayının 5'in Katı Olup Olmadığını Gösteren Örnek

VBA Bir String İçindeki Sayıların Toplamını Bulma Örneği

VBA Dosyaları Uzantıya Göre Arama

VBA Bir Dictionary'i Filtreleyip Yeni Bir Dictionary Yaratma Örne ...

VBA Yorum İçeren Tüm Hücreleri Vurgulu Yapmak