Terima Kasih Mr.Kid atas penjelasannya, akan saya coba pelajari dan coba-coba.
Terima kasih juga untuk mas Nang akan saya coba scriptnya. Jika sudah berhasil
dengan apa yang saya butuhkan akan saya share ke milis biar jadi referensi buat
yang lain jika membutuhkan.
Wassalamualaikum. Wr. Wb
On Tuesday, June 20, 2017 1:23 PM, "'Mr. Kid' [email protected]
[belajar-excel]" <[email protected]> wrote:
Wa'alaikumussalam wr wb
Hai Ryan,
1. Daftar file atau folder
Contoh udf untuk mendapatkan daftar file atau folder ada disini.
Kalau contoh file yang ada di website milis hanya daftar file saja. File di
website milis ada disini.
2. Mengisi daftar combobox
Bisa dilihat di blog milis tentang listbox dan combobox mulai dari sini.
Jika memanfaatkan properti List milik combobox, maka hasil dari nomor 1 yang
berupa array bisa dimanfaatkan (diisikan) ke properti List ini.
3. Cek ada item combobox yang terpilih atau tidak dengan cara cek nilai
properti listindex <> -1
4. Cek ada folder nya atau tidak dengan Len( Dir( fullpath ,vbdirectory ) ) <> 0
5. Cek ada filenya atau tidak dengan Len( Dir( fullname ) ) <> 0
*** Untuk menyalin dari suatu workbook, tidak perlu diketahui si workbook dalam
keadaan sedang dibuka oleh user lain atau tidak. Bila perlu, buka dalam keadaan
read only saja (lihat parameter fungsi dalam methods Open milik Workbook)
Wassalamu'alaikum wr wb
Kid
2017-06-18 0:38 GMT+07:00 Ryan Sacth [email protected] [belajar-excel]
<[email protected]>:
Assalamualaikum Wr.Wb
Halo semuanya.
Saya punya kasus, siapa tahu para suhu disini bisa bantu.
Saya ingin mengisi atau melihat data pada file excel yang saya sebut
Master_file dimana sumber datanya dari file excel yang tertutup didalam folder.
Gambarnya gini:
Pada Master_file akan diisi dengan data-data excel yang ada di folder A,B,C. Di
dalam Master_file ada pilihan menggunakan semacam ComboBox untuk ComboBox1
yakni di populated dengan nama-nama folder tersebut dan ComboBox2 adalah nama
file yang ada dalam folder A,B,C dan dalam file tersebut adalah file excel
dengan nama bulan (Januari.xlsx, februari.xlsx, dst). Kemudian akan dimunculkan
data pada Master_file dengan logika sederhananya seperti:
Asumsi:Semua bentuk format data baik column dan row yang ada dalam folder
adalah sama. Nama field pada kolom A-Z sama begitupun dengan rownya.
Bahasa Manusia:
- Jika ComboBox1 terpilih adalah Folder A dan ComboBox2 terpilih adalah file
Bulan Januari.xlsx, maka Sheet1 (Range A1:H10) pada Master_file akan
menampilkan data dari folder dan file dimaksud. Begitu pula jika dipilih adalah
folder dan file lain.
- Jika ComboBox1 terpilih adalah All Folder dan ComboBox2 terpilih adalah
file Bulan Januari.xlsx maka Sheet1 (Range A1:H10) pada Master_file akan
menampilkan data penjumlahan untuk file bulan Januari.xlsx pada semua folder
yang ada.
Mohon bantuannya.Terima Kasih.
#yiv6098375575 #yiv6098375575 -- #yiv6098375575ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv6098375575
#yiv6098375575ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv6098375575
#yiv6098375575ygrp-mkp #yiv6098375575hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv6098375575 #yiv6098375575ygrp-mkp #yiv6098375575ads
{margin-bottom:10px;}#yiv6098375575 #yiv6098375575ygrp-mkp .yiv6098375575ad
{padding:0 0;}#yiv6098375575 #yiv6098375575ygrp-mkp .yiv6098375575ad p
{margin:0;}#yiv6098375575 #yiv6098375575ygrp-mkp .yiv6098375575ad a
{color:#0000ff;text-decoration:none;}#yiv6098375575 #yiv6098375575ygrp-sponsor
#yiv6098375575ygrp-lc {font-family:Arial;}#yiv6098375575
#yiv6098375575ygrp-sponsor #yiv6098375575ygrp-lc #yiv6098375575hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv6098375575
#yiv6098375575ygrp-sponsor #yiv6098375575ygrp-lc .yiv6098375575ad
{margin-bottom:10px;padding:0 0;}#yiv6098375575 #yiv6098375575actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv6098375575
#yiv6098375575activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv6098375575
#yiv6098375575activity span {font-weight:700;}#yiv6098375575
#yiv6098375575activity span:first-child
{text-transform:uppercase;}#yiv6098375575 #yiv6098375575activity span a
{color:#5085b6;text-decoration:none;}#yiv6098375575 #yiv6098375575activity span
span {color:#ff7900;}#yiv6098375575 #yiv6098375575activity span
.yiv6098375575underline {text-decoration:underline;}#yiv6098375575
.yiv6098375575attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv6098375575 .yiv6098375575attach div a
{text-decoration:none;}#yiv6098375575 .yiv6098375575attach img
{border:none;padding-right:5px;}#yiv6098375575 .yiv6098375575attach label
{display:block;margin-bottom:5px;}#yiv6098375575 .yiv6098375575attach label a
{text-decoration:none;}#yiv6098375575 blockquote {margin:0 0 0
4px;}#yiv6098375575 .yiv6098375575bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv6098375575
.yiv6098375575bold a {text-decoration:none;}#yiv6098375575 dd.yiv6098375575last
p a {font-family:Verdana;font-weight:700;}#yiv6098375575 dd.yiv6098375575last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv6098375575
dd.yiv6098375575last p span.yiv6098375575yshortcuts
{margin-right:0;}#yiv6098375575 div.yiv6098375575attach-table div div a
{text-decoration:none;}#yiv6098375575 div.yiv6098375575attach-table
{width:400px;}#yiv6098375575 div.yiv6098375575file-title a, #yiv6098375575
div.yiv6098375575file-title a:active, #yiv6098375575
div.yiv6098375575file-title a:hover, #yiv6098375575 div.yiv6098375575file-title
a:visited {text-decoration:none;}#yiv6098375575 div.yiv6098375575photo-title a,
#yiv6098375575 div.yiv6098375575photo-title a:active, #yiv6098375575
div.yiv6098375575photo-title a:hover, #yiv6098375575
div.yiv6098375575photo-title a:visited {text-decoration:none;}#yiv6098375575
div#yiv6098375575ygrp-mlmsg #yiv6098375575ygrp-msg p a
span.yiv6098375575yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv6098375575
.yiv6098375575green {color:#628c2a;}#yiv6098375575 .yiv6098375575MsoNormal
{margin:0 0 0 0;}#yiv6098375575 o {font-size:0;}#yiv6098375575
#yiv6098375575photos div {float:left;width:72px;}#yiv6098375575
#yiv6098375575photos div div {border:1px solid
#666666;min-height:62px;overflow:hidden;width:62px;}#yiv6098375575
#yiv6098375575photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv6098375575
#yiv6098375575reco-category {font-size:77%;}#yiv6098375575
#yiv6098375575reco-desc {font-size:77%;}#yiv6098375575 .yiv6098375575replbq
{margin:4px;}#yiv6098375575 #yiv6098375575ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv6098375575 #yiv6098375575ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv6098375575
#yiv6098375575ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv6098375575
#yiv6098375575ygrp-mlmsg select, #yiv6098375575 input, #yiv6098375575 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv6098375575
#yiv6098375575ygrp-mlmsg pre, #yiv6098375575 code {font:115%
monospace;}#yiv6098375575 #yiv6098375575ygrp-mlmsg *
{line-height:1.22em;}#yiv6098375575 #yiv6098375575ygrp-mlmsg #yiv6098375575logo
{padding-bottom:10px;}#yiv6098375575 #yiv6098375575ygrp-msg p a
{font-family:Verdana;}#yiv6098375575 #yiv6098375575ygrp-msg
p#yiv6098375575attach-count span {color:#1E66AE;font-weight:700;}#yiv6098375575
#yiv6098375575ygrp-reco #yiv6098375575reco-head
{color:#ff7900;font-weight:700;}#yiv6098375575 #yiv6098375575ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv6098375575 #yiv6098375575ygrp-sponsor
#yiv6098375575ov li a {font-size:130%;text-decoration:none;}#yiv6098375575
#yiv6098375575ygrp-sponsor #yiv6098375575ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv6098375575
#yiv6098375575ygrp-sponsor #yiv6098375575ov ul {margin:0;padding:0 0 0
8px;}#yiv6098375575 #yiv6098375575ygrp-text
{font-family:Georgia;}#yiv6098375575 #yiv6098375575ygrp-text p {margin:0 0 1em
0;}#yiv6098375575 #yiv6098375575ygrp-text tt {font-size:120%;}#yiv6098375575
#yiv6098375575ygrp-vital ul li:last-child {border-right:none
!important;}#yiv6098375575
