Terima kasih Mbak Siti. Saya akan coba pelajari kodenya. Sudah dicoba dieksekusi dan berhasil
________________________________ From: STDEV(i) <[email protected]> To: [email protected] Sent: Friday, June 17, 2011 11:43 AM Subject: Re: [belajar-excel] UDF untuk Average kalau ingin mendekati algoritmanya kira kira begini Function AveragePalsu(MyRange As Range) As Double ' siti Vi / 17 Jun 2011 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 --workbook terlampirrrr 2011/6/17 hendrik karnadi <[email protected]> Coba gunakan cara merekam Macro (UDF) >Caranya : >- Aktifkan perekaman macro. >- Ketik formula "AVERAGE" yang anda inginkan >- Stop perekaman macro >Macro yang sudah dibuat secara otomatis tersebut dapat diupdate sesuai >kebutuhan. >Salam, >Hendrik Karnadi > > > >From: MAMUDA PONTIM <[email protected]> >To: "[email protected]" <[email protected]> >Sent: Friday, June 17, 2011 11:05 AM >Subject: [belajar-excel] UDF untuk Average > > >Mohon maaf sebelumnya, pertanyaan ini bukan untuk mengada-ada, tapi buat media >belajar bagi saya khususnya. Mudah-mudahan bermanfaat bagi member yang lain. >Saya mau tanya, bagaimana membuat fungsi (UDF) yang sama dengan AVERAGE di >worksheet function. > >
