Assalamualikum wr. wb.
Dear Mr. Kid,
Terima kasih atas bantuannya.
Salam
Edo
On Thursday, November 26, 2015 11:47 PM, "'Mr. Kid' mr.nm...@gmail.com
[belajar-excel]" <belajar-excel@yahoogroups.com> wrote:
Wa'alaikumussalam wr wb
Hai Edo,
Jadi bisa ada banyak cells sekaligus yang diubah (misal dengan copas) dan yang
berubah hanya di kolom C (di preview nya, kolom C adalah persentase).
> pada event change milik worksheet diberi kode VBA berikut :
dim rng as range,lRow as long
if not intersect( target,range("c:c") is nothing then 'cek yang berubah
beririsan dengan kolom C
application.enableevents=false 'cegah Excel untuk responsif
terhadap perilaku
on error resume next 'lewati error yang terjadi
for each rng in intersect( target,range("c:c") 'di setiap cells yang
berubah di kolom C
lrow=rng.row 'simpan baris
cells(lrow,4).value=cells(lrow,2).value*cells(lrow,3).value
'isi kolom D
if err.number=0 then 'kolom D terisi dengan baik ?
cells(lrow,2).value=cells(lrow,2).value-cells(lrow,4).value
'isi kolom B
endif 'selesai cek kolom D terisi dengan baik
err.clear 'hapus error yang terjadi
next rng 'ke range yang berubah berikutnya
on error goto 0 'kembalikan setting trap error ke default
application.enableevents=true 'excel boleh responsif lagi
endif 'selesai cek
Wassalamu'alaikum wr wb
Kid
2015-11-26 22:07 GMT+07:00 edo_hangg...@yahoo.com [belajar-excel]
<belajar-excel@yahoogroups.com>:
Assalamualaikum..
Dear All
Mau tanya bagaimana cara membuat kode VBA bahwa untuk setiap pengisian
atauperubahan nilai di setiap baris di kolom C akan menghasilkan nilai di
setiapbaris yang ada di kolom D berupa perkalian dari baris di kolom A dikali
dengan baris di kolom C .Sedangkan nilai yang ada di baris di kolom B sendiri
akan berkurang menjadinilai dari kolom B yang awal dikurangi dengan nilai yg
ada di baris kolom D.
Untuk lebih jelasnya, saya lampirkan filenya.
Terima kasih
Edo
#yiv4770050844 #yiv4770050844 -- #yiv4770050844ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv4770050844
#yiv4770050844ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv4770050844
#yiv4770050844ygrp-mkp #yiv4770050844hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv4770050844 #yiv4770050844ygrp-mkp #yiv4770050844ads
{margin-bottom:10px;}#yiv4770050844 #yiv4770050844ygrp-mkp .yiv4770050844ad
{padding:0 0;}#yiv4770050844 #yiv4770050844ygrp-mkp .yiv4770050844ad p
{margin:0;}#yiv4770050844 #yiv4770050844ygrp-mkp .yiv4770050844ad a
{color:#0000ff;text-decoration:none;}#yiv4770050844 #yiv4770050844ygrp-sponsor
#yiv4770050844ygrp-lc {font-family:Arial;}#yiv4770050844
#yiv4770050844ygrp-sponsor #yiv4770050844ygrp-lc #yiv4770050844hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv4770050844
#yiv4770050844ygrp-sponsor #yiv4770050844ygrp-lc .yiv4770050844ad
{margin-bottom:10px;padding:0 0;}#yiv4770050844 #yiv4770050844actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv4770050844
#yiv4770050844activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv4770050844
#yiv4770050844activity span {font-weight:700;}#yiv4770050844
#yiv4770050844activity span:first-child
{text-transform:uppercase;}#yiv4770050844 #yiv4770050844activity span a
{color:#5085b6;text-decoration:none;}#yiv4770050844 #yiv4770050844activity span
span {color:#ff7900;}#yiv4770050844 #yiv4770050844activity span
.yiv4770050844underline {text-decoration:underline;}#yiv4770050844
.yiv4770050844attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv4770050844 .yiv4770050844attach div a
{text-decoration:none;}#yiv4770050844 .yiv4770050844attach img
{border:none;padding-right:5px;}#yiv4770050844 .yiv4770050844attach label
{display:block;margin-bottom:5px;}#yiv4770050844 .yiv4770050844attach label a
{text-decoration:none;}#yiv4770050844 blockquote {margin:0 0 0
4px;}#yiv4770050844 .yiv4770050844bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv4770050844
.yiv4770050844bold a {text-decoration:none;}#yiv4770050844 dd.yiv4770050844last
p a {font-family:Verdana;font-weight:700;}#yiv4770050844 dd.yiv4770050844last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv4770050844
dd.yiv4770050844last p span.yiv4770050844yshortcuts
{margin-right:0;}#yiv4770050844 div.yiv4770050844attach-table div div a
{text-decoration:none;}#yiv4770050844 div.yiv4770050844attach-table
{width:400px;}#yiv4770050844 div.yiv4770050844file-title a, #yiv4770050844
div.yiv4770050844file-title a:active, #yiv4770050844
div.yiv4770050844file-title a:hover, #yiv4770050844 div.yiv4770050844file-title
a:visited {text-decoration:none;}#yiv4770050844 div.yiv4770050844photo-title a,
#yiv4770050844 div.yiv4770050844photo-title a:active, #yiv4770050844
div.yiv4770050844photo-title a:hover, #yiv4770050844
div.yiv4770050844photo-title a:visited {text-decoration:none;}#yiv4770050844
div#yiv4770050844ygrp-mlmsg #yiv4770050844ygrp-msg p a
span.yiv4770050844yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv4770050844
.yiv4770050844green {color:#628c2a;}#yiv4770050844 .yiv4770050844MsoNormal
{margin:0 0 0 0;}#yiv4770050844 o {font-size:0;}#yiv4770050844
#yiv4770050844photos div {float:left;width:72px;}#yiv4770050844
#yiv4770050844photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv4770050844
#yiv4770050844photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv4770050844
#yiv4770050844reco-category {font-size:77%;}#yiv4770050844
#yiv4770050844reco-desc {font-size:77%;}#yiv4770050844 .yiv4770050844replbq
{margin:4px;}#yiv4770050844 #yiv4770050844ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv4770050844 #yiv4770050844ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv4770050844
#yiv4770050844ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv4770050844
#yiv4770050844ygrp-mlmsg select, #yiv4770050844 input, #yiv4770050844 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv4770050844
#yiv4770050844ygrp-mlmsg pre, #yiv4770050844 code {font:115%
monospace;}#yiv4770050844 #yiv4770050844ygrp-mlmsg *
{line-height:1.22em;}#yiv4770050844 #yiv4770050844ygrp-mlmsg #yiv4770050844logo
{padding-bottom:10px;}#yiv4770050844 #yiv4770050844ygrp-msg p a
{font-family:Verdana;}#yiv4770050844 #yiv4770050844ygrp-msg
p#yiv4770050844attach-count span {color:#1E66AE;font-weight:700;}#yiv4770050844
#yiv4770050844ygrp-reco #yiv4770050844reco-head
{color:#ff7900;font-weight:700;}#yiv4770050844 #yiv4770050844ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv4770050844 #yiv4770050844ygrp-sponsor
#yiv4770050844ov li a {font-size:130%;text-decoration:none;}#yiv4770050844
#yiv4770050844ygrp-sponsor #yiv4770050844ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv4770050844
#yiv4770050844ygrp-sponsor #yiv4770050844ov ul {margin:0;padding:0 0 0
8px;}#yiv4770050844 #yiv4770050844ygrp-text
{font-family:Georgia;}#yiv4770050844 #yiv4770050844ygrp-text p {margin:0 0 1em
0;}#yiv4770050844 #yiv4770050844ygrp-text tt {font-size:120%;}#yiv4770050844
#yiv4770050844ygrp-vital ul li:last-child {border-right:none
!important;}#yiv4770050844
