Mungkin begini :
Sheet1.Cells(2, 3).Value =*
application.worksheetfunction.*RoundDown((Sheet1.Cells(2,
1).Value), -1)
 Sheet1.Cells(3, 3).Value =
*application.worksheetfunction.*RoundUp((Sheet1.Cells(2,
1).Value), -1)


Wassalam,
Kid.

On Fri, Jan 25, 2013 at 11:01 AM, Suka Sih <[email protected]> wrote:

> **
>
>
> Penggemar excel,
>
> Rumus RoundUp dan RoundDown  pada vba yang saya tulis mengalami kegagalan,
> yaitu
>
>  Sheet1.Cells(2, 3).Value = RoundDown((Sheet1.Cells(2, 1).Value), -1)
>  Sheet1.Cells(3, 3).Value = RoundUp((Sheet1.Cells(2, 1).Value), -1)
>
> Bagaimana ya cara penulisan  yang benar kode di atas ?
>
>  
>

Kirim email ke