Dear Master HK,terima kasih atas warisannya sangat bermanfaaat. satu lagi
kesulitan saya, bagaimana mengganti script column yang berurutan menjadi loncat
seperti 4 To 8 menjadi 4, 7, 8, 10, 12 pada kasus dibawah ini:
For r = 1 To JmlItem
If .[B10:J19].Cells(r, 1) = "" Then Exit For
TblSub(NewSub + r, 0) = NewSub + r '# urut
TblSub(NewSub + r, 1) = .[J6] ' Nr Inv
TblSub(NewSub + r, 2) = .[J5] ' Tg Inv
TblSub(NewSub + r, 2).NumberFormat = "dd mmm yy"
TblSub(NewSub + r, 3) = .[D5] ' Nm Cust
For c = 4 To 8
' NmProduk, Periode, Harga, Qty, TotalHarga
TblSub(NewSub + r, c) = .[B10:J19].Cells(r, c - 3)
Next c
Next r
Terima kasih sekali atas bantuannya
salamKang Oza
On Tuesday, November 24, 2015 2:48 PM, Ahmad Rojali <[email protected]>
wrote:
Terima Kasih Pa HK,sangat membantu sekali, saya coba pelajari dulu
SalamKang Oza
On Tuesday, November 24, 2015 2:41 PM, "hendrik karnadi
[email protected] [belajar-excel]" <[email protected]> wrote:
Hai Kang Oza,Coba file warisan si mbah ini (telah diedit).
Salam,HK
From: "Ahmad Rojali [email protected] [belajar-excel]"
<[email protected]>
To: [email protected]
Sent: Tuesday, 24 November 2015, 9:55
Subject: [belajar-excel] Membuat database induk dan database anak [1
Attachment]
Dear Para Master,
Saya masih sangat awam tentang macro. mohon bantuan untuk menyimpan data di
database induk dan database anak.
penjelasannya: jika kita mengisi di sheet "Invoicing" lalu kita tekan button
rekam, maka data akan tersimpan di sheet "RkpInduk" sebagai Rekapan invoice dan
di Sheet "RkpAnak" sebagai rincian invoice. dan ketika sewaktu-waktu
dibutuhkan, data tersebut dapat dipanggil di Sheet "Print" dengan data sama
persis seperti waktu dibuat di sheet "Invoicing" seperti file terlampir.
Terima kasih banyak atas bantuannya
Regards
Kang Oza
#yiv0978846594 -- #yiv0978846594ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv0978846594
#yiv0978846594ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv0978846594
#yiv0978846594ygrp-mkp #yiv0978846594hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv0978846594 #yiv0978846594ygrp-mkp #yiv0978846594ads
{margin-bottom:10px;}#yiv0978846594 #yiv0978846594ygrp-mkp .yiv0978846594ad
{padding:0 0;}#yiv0978846594 #yiv0978846594ygrp-mkp .yiv0978846594ad p
{margin:0;}#yiv0978846594 #yiv0978846594ygrp-mkp .yiv0978846594ad a
{color:#0000ff;text-decoration:none;}#yiv0978846594 #yiv0978846594ygrp-sponsor
#yiv0978846594ygrp-lc {font-family:Arial;}#yiv0978846594
#yiv0978846594ygrp-sponsor #yiv0978846594ygrp-lc #yiv0978846594hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv0978846594
#yiv0978846594ygrp-sponsor #yiv0978846594ygrp-lc .yiv0978846594ad
{margin-bottom:10px;padding:0 0;}#yiv0978846594 #yiv0978846594actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv0978846594
#yiv0978846594activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv0978846594
#yiv0978846594activity span {font-weight:700;}#yiv0978846594
#yiv0978846594activity span:first-child
{text-transform:uppercase;}#yiv0978846594 #yiv0978846594activity span a
{color:#5085b6;text-decoration:none;}#yiv0978846594 #yiv0978846594activity span
span {color:#ff7900;}#yiv0978846594 #yiv0978846594activity span
.yiv0978846594underline {text-decoration:underline;}#yiv0978846594
.yiv0978846594attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv0978846594 .yiv0978846594attach div a
{text-decoration:none;}#yiv0978846594 .yiv0978846594attach img
{border:none;padding-right:5px;}#yiv0978846594 .yiv0978846594attach label
{display:block;margin-bottom:5px;}#yiv0978846594 .yiv0978846594attach label a
{text-decoration:none;}#yiv0978846594 blockquote {margin:0 0 0
4px;}#yiv0978846594 .yiv0978846594bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv0978846594
.yiv0978846594bold a {text-decoration:none;}#yiv0978846594 dd.yiv0978846594last
p a {font-family:Verdana;font-weight:700;}#yiv0978846594 dd.yiv0978846594last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv0978846594
dd.yiv0978846594last p span.yiv0978846594yshortcuts
{margin-right:0;}#yiv0978846594 div.yiv0978846594attach-table div div a
{text-decoration:none;}#yiv0978846594 div.yiv0978846594attach-table
{width:400px;}#yiv0978846594 div.yiv0978846594file-title a, #yiv0978846594
div.yiv0978846594file-title a:active, #yiv0978846594
div.yiv0978846594file-title a:hover, #yiv0978846594 div.yiv0978846594file-title
a:visited {text-decoration:none;}#yiv0978846594 div.yiv0978846594photo-title a,
#yiv0978846594 div.yiv0978846594photo-title a:active, #yiv0978846594
div.yiv0978846594photo-title a:hover, #yiv0978846594
div.yiv0978846594photo-title a:visited {text-decoration:none;}#yiv0978846594
div#yiv0978846594ygrp-mlmsg #yiv0978846594ygrp-msg p a
span.yiv0978846594yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv0978846594
.yiv0978846594green {color:#628c2a;}#yiv0978846594 .yiv0978846594MsoNormal
{margin:0 0 0 0;}#yiv0978846594 o {font-size:0;}#yiv0978846594
#yiv0978846594photos div {float:left;width:72px;}#yiv0978846594
#yiv0978846594photos div div {border:1px solid
#666666;height:62px;overflow:hidden;width:62px;}#yiv0978846594
#yiv0978846594photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv0978846594
#yiv0978846594reco-category {font-size:77%;}#yiv0978846594
#yiv0978846594reco-desc {font-size:77%;}#yiv0978846594 .yiv0978846594replbq
{margin:4px;}#yiv0978846594 #yiv0978846594ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv0978846594 #yiv0978846594ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv0978846594
#yiv0978846594ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv0978846594
#yiv0978846594ygrp-mlmsg select, #yiv0978846594 input, #yiv0978846594 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv0978846594
#yiv0978846594ygrp-mlmsg pre, #yiv0978846594 code {font:115%
monospace;}#yiv0978846594 #yiv0978846594ygrp-mlmsg *
{line-height:1.22em;}#yiv0978846594 #yiv0978846594ygrp-mlmsg #yiv0978846594logo
{padding-bottom:10px;}#yiv0978846594 #yiv0978846594ygrp-msg p a
{font-family:Verdana;}#yiv0978846594 #yiv0978846594ygrp-msg
p#yiv0978846594attach-count span {color:#1E66AE;font-weight:700;}#yiv0978846594
#yiv0978846594ygrp-reco #yiv0978846594reco-head
{color:#ff7900;font-weight:700;}#yiv0978846594 #yiv0978846594ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv0978846594 #yiv0978846594ygrp-sponsor
#yiv0978846594ov li a {font-size:130%;text-decoration:none;}#yiv0978846594
#yiv0978846594ygrp-sponsor #yiv0978846594ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv0978846594
#yiv0978846594ygrp-sponsor #yiv0978846594ov ul {margin:0;padding:0 0 0
8px;}#yiv0978846594 #yiv0978846594ygrp-text
{font-family:Georgia;}#yiv0978846594 #yiv0978846594ygrp-text p {margin:0 0 1em
0;}#yiv0978846594 #yiv0978846594ygrp-text tt {font-size:120%;}#yiv0978846594
#yiv0978846594ygrp-vital ul li:last-child {border-right:none
!important;}#yiv0978846594
