VBA ile Ortalama Alma

average

 

VBA ile ortalama almak icin asagidaki kodlari kullanabilirsiniz, ornekte mesaj ile gosterilme kullanilmistir.

Sub Average()
Dim mesaj As Double 'kusurat istenirse
'Dim mesaj As Long 'tam sayi

mesaj = Application.WorksheetFunction.Average(ActiveSheet.Range("sayilar"))

MsgBox mesaj, vbInformation, "Average"
End Sub

VBA ile ortalama alma

Yazar: mmustafaaslan

2004 yilindan itibaren ozel bir sirketin finans departmaninda calismaktadir. Kendini excel, visual basic kullaniminda gelistirmis olan yazarimiz; Meslegi geregi SAP konusunda ileri derecede bilgilidir.

Bir Cevap Yazın

E-posta hesabınız yayımlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir


1 + 9 =