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 ? > > >

