Dear Edo,
1. Maaf, sepertinya forum ini adalah forum untuk pembelajaran tentang Excel,
bukan forum untuk nge-bikinin suatu program siap pakai.2. Jika petanyaan anda
ingin di jawab oleh teman-teman di forum ini, baiknya ajukan pertanyaan satu
persatu dari permasalahan yang anda hadapi.3. Jangan pernah memaksakan
menggunakan VBA jika anda belum memahami dan mengerti tentang VBA itu sendiri,
artinya setiap permasalahan di Excel dapat di selesaikan juga dengan
menggunakan formula yang ada di Excel itu sendiri.
Di tunggu saja, mungkin ada teman-teman di forum ini yang berbaik hati untuk
menjawab keseluruhan pertanyaan anda.
TerimaKasih.
Pada Kamis, 23 Februari 2017 7:01, "[email protected] [belajar-excel]"
<[email protected]> menulis:
Assalamualaikum...Dear BeExceller
Saya mohonbantuannya dalam membuat VBAscript untuk pencarian (Find) otomatis
dengan menggunakankondisi tertentu dari TabelSource (Sheet Source) ke dalam
tableTarget (Sheet Target 1, Sheet Target 2). Angka yang akan dicari adalah
angka yang ada di kolom AmountSource di Tabel Source dan akan dicocokkan dengan
angka di kolom Detail Debit di Sheet Target 1 dan Sheet Target 2.
Adapun untuk persyaratan atau kondisi dalam pencarian adalah:
- Hanya akan mencari angka dari Tabel Source yang tidak ada tanggalnya atau
kosong pada kolom Date Target.
- Angka yang akan dicocokanatau dicari hanya angka di kolom Debit Detail
pada Sheet Target1 dan 2 yang memiliki kode210 di kolom Code.
- Setelah ketemu dan ada kecocokan angka dari Amount Source dengan angka
dalam tabel Target, data dari kedua tabel tersebutakan otomatis saling mengisi
dengan kondisi sebagai berikut:
o Tanggal dari kolom Date di Tabel Target akan mengisi di tanggal di kolom
Date Target padaSheet Source.o Tanggal dari kolom Date Source diSheet Target
akan mengisi di kolom Date 2 pada Sheet Target (Target1 atau Target2).o Angka
dari kolom Doc Source di SheetSource akan mengisi di kolom Doc Source pada
Sheet Target (Target1 atau Target2).o Nama Unit di kolom Unit dari Sheet
Source akanmengisi nama Unit di kolom Unit pada Sheet Target (Target1 atau
Target2).o Nama Sheet pada Sheet Target1 atau 2 akan mengisi di kolom
TargetCode di Sheet Source.o Pencarian akan mulai pada Sheet Target 1 dan jika
tidak ditemukan makaakan diteruskan pada Sheet Target 2.o Setelah ada angka
yang ditemukan dandicocokan, maka akan mencari angka berikutnya di Sheet
Source.o Option Find yang digunakan adalah : Match EntireCell Contents.
Untuk memudahkan saya lampirkan filenya beserta contoh pada Sheet Source dan
Sheet Target1 dan Target 2
Terima kasih
Edo
#yiv3611099122 #yiv3611099122 -- #yiv3611099122ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv3611099122
#yiv3611099122ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv3611099122
#yiv3611099122ygrp-mkp #yiv3611099122hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv3611099122 #yiv3611099122ygrp-mkp #yiv3611099122ads
{margin-bottom:10px;}#yiv3611099122 #yiv3611099122ygrp-mkp .yiv3611099122ad
{padding:0 0;}#yiv3611099122 #yiv3611099122ygrp-mkp .yiv3611099122ad p
{margin:0;}#yiv3611099122 #yiv3611099122ygrp-mkp .yiv3611099122ad a
{color:#0000ff;text-decoration:none;}#yiv3611099122 #yiv3611099122ygrp-sponsor
#yiv3611099122ygrp-lc {font-family:Arial;}#yiv3611099122
#yiv3611099122ygrp-sponsor #yiv3611099122ygrp-lc #yiv3611099122hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv3611099122
#yiv3611099122ygrp-sponsor #yiv3611099122ygrp-lc .yiv3611099122ad
{margin-bottom:10px;padding:0 0;}#yiv3611099122 #yiv3611099122actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv3611099122
#yiv3611099122activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv3611099122
#yiv3611099122activity span {font-weight:700;}#yiv3611099122
#yiv3611099122activity span:first-child
{text-transform:uppercase;}#yiv3611099122 #yiv3611099122activity span a
{color:#5085b6;text-decoration:none;}#yiv3611099122 #yiv3611099122activity span
span {color:#ff7900;}#yiv3611099122 #yiv3611099122activity span
.yiv3611099122underline {text-decoration:underline;}#yiv3611099122
.yiv3611099122attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv3611099122 .yiv3611099122attach div a
{text-decoration:none;}#yiv3611099122 .yiv3611099122attach img
{border:none;padding-right:5px;}#yiv3611099122 .yiv3611099122attach label
{display:block;margin-bottom:5px;}#yiv3611099122 .yiv3611099122attach label a
{text-decoration:none;}#yiv3611099122 blockquote {margin:0 0 0
4px;}#yiv3611099122 .yiv3611099122bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv3611099122
.yiv3611099122bold a {text-decoration:none;}#yiv3611099122 dd.yiv3611099122last
p a {font-family:Verdana;font-weight:700;}#yiv3611099122 dd.yiv3611099122last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv3611099122
dd.yiv3611099122last p span.yiv3611099122yshortcuts
{margin-right:0;}#yiv3611099122 div.yiv3611099122attach-table div div a
{text-decoration:none;}#yiv3611099122 div.yiv3611099122attach-table
{width:400px;}#yiv3611099122 div.yiv3611099122file-title a, #yiv3611099122
div.yiv3611099122file-title a:active, #yiv3611099122
div.yiv3611099122file-title a:hover, #yiv3611099122 div.yiv3611099122file-title
a:visited {text-decoration:none;}#yiv3611099122 div.yiv3611099122photo-title a,
#yiv3611099122 div.yiv3611099122photo-title a:active, #yiv3611099122
div.yiv3611099122photo-title a:hover, #yiv3611099122
div.yiv3611099122photo-title a:visited {text-decoration:none;}#yiv3611099122
div#yiv3611099122ygrp-mlmsg #yiv3611099122ygrp-msg p a
span.yiv3611099122yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv3611099122
.yiv3611099122green {color:#628c2a;}#yiv3611099122 .yiv3611099122MsoNormal
{margin:0 0 0 0;}#yiv3611099122 o {font-size:0;}#yiv3611099122
#yiv3611099122photos div {float:left;width:72px;}#yiv3611099122
#yiv3611099122photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv3611099122
#yiv3611099122photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv3611099122
#yiv3611099122reco-category {font-size:77%;}#yiv3611099122
#yiv3611099122reco-desc {font-size:77%;}#yiv3611099122 .yiv3611099122replbq
{margin:4px;}#yiv3611099122 #yiv3611099122ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv3611099122 #yiv3611099122ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv3611099122
#yiv3611099122ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv3611099122
#yiv3611099122ygrp-mlmsg select, #yiv3611099122 input, #yiv3611099122 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv3611099122
#yiv3611099122ygrp-mlmsg pre, #yiv3611099122 code {font:115%
monospace;}#yiv3611099122 #yiv3611099122ygrp-mlmsg *
{line-height:1.22em;}#yiv3611099122 #yiv3611099122ygrp-mlmsg #yiv3611099122logo
{padding-bottom:10px;}#yiv3611099122 #yiv3611099122ygrp-msg p a
{font-family:Verdana;}#yiv3611099122 #yiv3611099122ygrp-msg
p#yiv3611099122attach-count span {color:#1E66AE;font-weight:700;}#yiv3611099122
#yiv3611099122ygrp-reco #yiv3611099122reco-head
{color:#ff7900;font-weight:700;}#yiv3611099122 #yiv3611099122ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv3611099122 #yiv3611099122ygrp-sponsor
#yiv3611099122ov li a {font-size:130%;text-decoration:none;}#yiv3611099122
#yiv3611099122ygrp-sponsor #yiv3611099122ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv3611099122
#yiv3611099122ygrp-sponsor #yiv3611099122ov ul {margin:0;padding:0 0 0
8px;}#yiv3611099122 #yiv3611099122ygrp-text
{font-family:Georgia;}#yiv3611099122 #yiv3611099122ygrp-text p {margin:0 0 1em
0;}#yiv3611099122 #yiv3611099122ygrp-text tt {font-size:120%;}#yiv3611099122
#yiv3611099122ygrp-vital ul li:last-child {border-right:none
!important;}#yiv3611099122
