Beberapa waktu lalu saya menanyakan UDF yang sama dengan fungsi average di worksheet. Mbak Siti memberikan jawaban seperti ini:
Function AveragePalsu(MyRange As Range) As Double Dim Jumlah As Double Dim Banyak As Long Dim cel As Range For Each cel In MyRange Jumlah = Jumlah + cel If cel <> 0 Then Banyak = Banyak + 1 Next AveragePalsu = Jumlah / Banyak End Function UDF tersebut berfungsi. Namun, ketika kita coba menuliskan angka langsung pada rumus (contoh =AveragePalsu(12,14)), hasilnya Error. Bagaimana solusinya.....? Terima kasih
