Terima kasih atas jawabannya mas NangAgus.Yang membuat saya masih penasaran adalah:Kan untuk perhitungan dengan UDF maupun formula...keduanya menggunakan dasar pehitungan yang sama, yaitu PhKP dibulatkan ke bawah dalam ribuan.. Salam,HK
Sent from Yahoo Mail on Android On Sun, May 26, 2019 at 20:46, Agus [email protected] [belajar-excel]<[email protected]> wrote: Pak Hendrik, Yang salah hanya yang datanya memiliki tiga digit terakhir lebih dari 500; .> baris ke 12 3 digit terakhir= 565 ->baris ke 13: 3 digit terakhir = 987 Coba semua baris diberitiga digit terakhir lebih dari 500, akan menjadi berbeda semua salam NangAgus On 5/26/2019 14:03, hendrik karnadi [email protected] [belajar-excel] wrote: Kayaknya sih memang masalah pembulatan Mr.Kid. Yang membuat saya penasaran, mengapa hanya terjadi pada 2 baris itu saja. Salam, HK Sent from Yahoo Mail on Android On Sun, May 26, 2019 at 4:34, 'Mr. Kid' [email protected] [belajar-excel] <[email protected]> wrote: Mungkin karena round Sent from my smart enough phone On May 25, 2019, at 20:48, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Dear Be-Excel, Untuk mengisi waktu luang di malam minggu, saya mencoba me-lihat2 kembali warisan Alm. Mbak Siti (Senior kita). Di situ saya menemukan UDF untuk menghitung Penghasilan Kena Pajak, yang secara aturan dibulatkan kebawah (dalam ribuan). Dalam Worksheet terlampir (saya revisi hanya untuk th 2009), beliau memperbandingkan hasil perhitungan UDF dengan Formula. UDF nya adalah sebagai berikut: Option Explicit Function fPPh21_2009(PhKP As Currency) As Currency Dim LapisPh() As Currency Dim Tarif() As Double 'mbak Siti pakai Single, saya ganti Double Dim n As Integer, Lps, Trf Dim pajak As Currency Lps = Split("|50|250|500", "|") ReDim LapisPh(1 To UBound(Lps)) For n = 1 To UBound(Lps): LapisPh(n) = Round((CLng(Lps(n)) * 10 ^ 6), 0): Next n Trf = Split("/5/15/25/30", "/") ReDim Tarif(1 To UBound(Trf)) For n = 1 To UBound(Trf): Tarif(n) = Round((CDbl(Trf(n)) / 100), 2): Next n 'Sng saya ganti Dbl PhKP = 1000 * Round(PhKP / 1000, 0) Select Case PhKP Case Is <= LapisPh(1) pajak = PhKP * Tarif(1) Case Is <= LapisPh(2) pajak = LapisPh(1) * Tarif(1) _ + (PhKP - LapisPh(1)) * Tarif(2) Case Is <= LapisPh(3) pajak = LapisPh(1) * Tarif(1) _ + (LapisPh(2) - LapisPh(1)) * Tarif(2) _ + (PhKP - LapisPh(2)) * Tarif(3) Case Is > LapisPh(3) pajak = (LapisPh(1)) * Tarif(1) _ + (LapisPh(2) - LapisPh(1)) * Tarif(2) _ + (LapisPh(3) - LapisPh(2)) * Tarif(3) _ + (PhKP - LapisPh(3)) * Tarif(4) End Select fPPh21_2009 = Round(pajak) End Function Formula pada baris 12 dan 13 adalah sbb: =IF(C12<=0,0,IF(C12<=50000000,5%*C12,IF(C12<=250000000,50000000*5%+(C12-50000000)*15%,IF(C12<=500000000,50000000*5%+200000000*15%+(C12-250000000)*25%,50000000*5%+200000000*15%+250000000*25%+(C12-500000000)*30%)))) =IF(C13<=0,0,IF(C13<=50000000,5%*C13,IF(C13<=250000000,50000000*5%+(C13-50000000)*15%,IF(C13<=500000000,50000000*5%+200000000*15%+(C13-250000000)*25%,50000000*5%+200000000*15%+250000000*25%+(C13-500000000)*30%)))) Hasilnya seharusnya sama tapi berbeda beberapa ratus rupiah hanya pada kedua baris ini. Pertanyaan saya (bukan ngetes): Apa yang menyebabkan terjadinya perbedaan tsb ? Untuk lebih jelasnya saya lampirkan workbooknya. Terima kasih. Salam, HK <UDF_fPPh21 (Rev by HK - Single to Double).xls> #yiv9396604497 #yiv9396604497 -- #yiv9396604497ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv9396604497 #yiv9396604497ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv9396604497 #yiv9396604497ygrp-mkp #yiv9396604497hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv9396604497 #yiv9396604497ygrp-mkp #yiv9396604497ads {margin-bottom:10px;}#yiv9396604497 #yiv9396604497ygrp-mkp .yiv9396604497ad {padding:0 0;}#yiv9396604497 #yiv9396604497ygrp-mkp .yiv9396604497ad p {margin:0;}#yiv9396604497 #yiv9396604497ygrp-mkp .yiv9396604497ad a {color:#0000ff;text-decoration:none;}#yiv9396604497 #yiv9396604497ygrp-sponsor #yiv9396604497ygrp-lc {font-family:Arial;}#yiv9396604497 #yiv9396604497ygrp-sponsor #yiv9396604497ygrp-lc #yiv9396604497hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv9396604497 #yiv9396604497ygrp-sponsor #yiv9396604497ygrp-lc .yiv9396604497ad {margin-bottom:10px;padding:0 0;}#yiv9396604497 #yiv9396604497actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv9396604497 #yiv9396604497activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv9396604497 #yiv9396604497activity span {font-weight:700;}#yiv9396604497 #yiv9396604497activity span:first-child {text-transform:uppercase;}#yiv9396604497 #yiv9396604497activity span a {color:#5085b6;text-decoration:none;}#yiv9396604497 #yiv9396604497activity span span {color:#ff7900;}#yiv9396604497 #yiv9396604497activity span .yiv9396604497underline {text-decoration:underline;}#yiv9396604497 .yiv9396604497attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv9396604497 .yiv9396604497attach div a {text-decoration:none;}#yiv9396604497 .yiv9396604497attach img {border:none;padding-right:5px;}#yiv9396604497 .yiv9396604497attach label {display:block;margin-bottom:5px;}#yiv9396604497 .yiv9396604497attach label a {text-decoration:none;}#yiv9396604497 blockquote {margin:0 0 0 4px;}#yiv9396604497 .yiv9396604497bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv9396604497 .yiv9396604497bold a {text-decoration:none;}#yiv9396604497 dd.yiv9396604497last p a {font-family:Verdana;font-weight:700;}#yiv9396604497 dd.yiv9396604497last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv9396604497 dd.yiv9396604497last p span.yiv9396604497yshortcuts {margin-right:0;}#yiv9396604497 div.yiv9396604497attach-table div div a {text-decoration:none;}#yiv9396604497 div.yiv9396604497attach-table {width:400px;}#yiv9396604497 div.yiv9396604497file-title a, #yiv9396604497 div.yiv9396604497file-title a:active, #yiv9396604497 div.yiv9396604497file-title a:hover, #yiv9396604497 div.yiv9396604497file-title a:visited {text-decoration:none;}#yiv9396604497 div.yiv9396604497photo-title a, #yiv9396604497 div.yiv9396604497photo-title a:active, #yiv9396604497 div.yiv9396604497photo-title a:hover, #yiv9396604497 div.yiv9396604497photo-title a:visited {text-decoration:none;}#yiv9396604497 div#yiv9396604497ygrp-mlmsg #yiv9396604497ygrp-msg p a span.yiv9396604497yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv9396604497 .yiv9396604497green {color:#628c2a;}#yiv9396604497 .yiv9396604497MsoNormal {margin:0 0 0 0;}#yiv9396604497 o {font-size:0;}#yiv9396604497 #yiv9396604497photos div {float:left;width:72px;}#yiv9396604497 #yiv9396604497photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv9396604497 #yiv9396604497photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv9396604497 #yiv9396604497reco-category {font-size:77%;}#yiv9396604497 #yiv9396604497reco-desc {font-size:77%;}#yiv9396604497 .yiv9396604497replbq {margin:4px;}#yiv9396604497 #yiv9396604497ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv9396604497 #yiv9396604497ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv9396604497 #yiv9396604497ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv9396604497 #yiv9396604497ygrp-mlmsg select, #yiv9396604497 input, #yiv9396604497 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv9396604497 #yiv9396604497ygrp-mlmsg pre, #yiv9396604497 code {font:115% monospace;}#yiv9396604497 #yiv9396604497ygrp-mlmsg * {line-height:1.22em;}#yiv9396604497 #yiv9396604497ygrp-mlmsg #yiv9396604497logo {padding-bottom:10px;}#yiv9396604497 #yiv9396604497ygrp-msg p a {font-family:Verdana;}#yiv9396604497 #yiv9396604497ygrp-msg p#yiv9396604497attach-count span {color:#1E66AE;font-weight:700;}#yiv9396604497 #yiv9396604497ygrp-reco #yiv9396604497reco-head {color:#ff7900;font-weight:700;}#yiv9396604497 #yiv9396604497ygrp-reco {margin-bottom:20px;padding:0px;}#yiv9396604497 #yiv9396604497ygrp-sponsor #yiv9396604497ov li a {font-size:130%;text-decoration:none;}#yiv9396604497 #yiv9396604497ygrp-sponsor #yiv9396604497ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv9396604497 #yiv9396604497ygrp-sponsor #yiv9396604497ov ul {margin:0;padding:0 0 0 8px;}#yiv9396604497 #yiv9396604497ygrp-text {font-family:Georgia;}#yiv9396604497 #yiv9396604497ygrp-text p {margin:0 0 1em 0;}#yiv9396604497 #yiv9396604497ygrp-text tt {font-size:120%;}#yiv9396604497 #yiv9396604497ygrp-vital ul li:last-child {border-right:none !important;}#yiv9396604497
