[belajar-excel] Digest Number 3792

Milis Belajar Microsoft Excel Group

3 Messages

Digest #3792

1a

Pembulatan kelipatan tertentu dari suatu nilai dalam suatu control by "Walsoyo"

1b

Re: Pembulatan kelipatan tertentu dari suatu nilai dalam suatu contr by "nangagus"

1c

Re: Pembulatan kelipatan tertentu dari suatu nilai dalam suatu contr by "Mr. Kid" nmkid.family@ymail.com

Messages

1a

Pembulatan kelipatan tertentu dari suatu nilai dalam suatu control

Fri Mar 11, 2016 5:39 am (PST) . Posted by:

"Walsoyo"

Bagaimana rumus pembulatan dengan vba pada textbox contoh textbox1=ceiling(textbox2,100) misal tbox2=1245,56789 maka hasilnya jadi 1300

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

1b

Re: Pembulatan kelipatan tertentu dari suatu nilai dalam suatu contr

Fri Mar 11, 2016 6:55 pm (PST) . Posted by:

"nangagus"

Dear Walyoso,
coba gunakan formula:
Int(x / 10 ^ y) - (Int(x / 10 ^ y) * 1000 < x)) * 10 ^ y

atau dapat digunakan formula:
Application.WorksheetFunction.Ceilling, tetapi katanya yang ada di sini
<http://www.mrexcel.com/forum/excel-questions/218947-floor-function-visual-basic-applications-code.html>
menjadi lebih lambat kalau pakai worksheet function.

On 11/03/2016 20:36, Walsoyo soyomakmur@gmail.com [belajar-excel] wrote:
>
> Bagaimana rumus pembulatan dengan vba pada textbox contoh
> textbox1=ceiling(textbox2,100) misal tbox2=1245,56789 maka hasilnya
> jadi 1300
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

1c

Re: Pembulatan kelipatan tertentu dari suatu nilai dalam suatu contr

Sat Mar 12, 2016 2:02 am (PST) . Posted by:

"Mr. Kid" nmkid.family@ymail.com

textbox1.text=evaluate("=ceiling(" & textbox2.text & "*1,100)")

berhubung textbox2 bisa terisi suatu nilai data yang bukan numeric, lakukan
cek terlebih dahulu terhadap nilai textbox2
if isnumeric(textbox2.text) then
textbox1.text=evaluate("=ceiling(" & textbox2.text & "*1,100)")
else
textbox1.text=vbnullstring
endif

baris perintah tersebut bisa diletakkan pada event change milik textbox2

Regards,
Kid

2016-03-11 20:36 GMT+07:00 Walsoyo soyomakmur@gmail.com [belajar-excel] <
belajar-excel@yahoogroups.com>:

>
>
> Bagaimana rumus pembulatan dengan vba pada textbox contoh
> textbox1=ceiling(textbox2,100) misal tbox2=1245,56789 maka hasilnya jadi
> 1300
>
>
>

Reply to sender . Reply to group . Reply via Web Post . All Messages (3) . Top ^

============================================================
Pojok Lowongan Kerja yang disediakan milis :
http://milis-belajar-excel.1048464.n5.nabble.com/Pojok-Lowongan-Kerja-f5725753.html
*** Posting lowongan kerja : ke link tersebut dan klik New Topic
============================================================
bergabung ke milis (subscribe), kirim mail kosong ke: belajar-excel-subscribe@yahoogroups.com
posting ke milis, kirimkan ke: belajar-excel@yahoogroups.com
berkunjung ke web milis : http://tech.groups.yahoo.com/group/belajar-excel/messages
melihat file archive / mendownload lampiran : http://www.mail-archive.com/belajar-excel@yahoogroups.com/
atau (sejak 25-Apr-2011) bisa juga di : http://milis-belajar-excel.1048464.n5.nabble.com/
menghubungi moderators & owners: belajar-excel-owner@yahoogroups.com
keluar dari membership milis (UnSubscribe), kirim mail kosong ke : belajar-excel-unsubscribe@yahoogroups.com
---------------------------------------------------------------------

Visit Your Group

• New Members 4

• Privacy • Unsubscribe • Terms of Use