Dear Odhy,Coba kirim .zip dummy filenya. Salam,HK Sent from Yahoo Mail on Android On Fri, Jul 28, 2017 at 23:43, rodhy hakim [email protected] [belajar-excel]<[email protected]> wrote:
Dear Mr HK, Sudah sesuai tidak yg sy rubah, file master masih dlm folder gabungan.. Dikirim dari iPhone saya Pada 28 Jul 2017, pukul 23.02, hendrik karnadi [email protected] [belajar-excel] <[email protected]> menulis: Hai Odhy, Nama File di Sheet2 Range("A1") sdh sesuai dengan nama file gabungannya (dalam contoh saya namanya "Master") ? Salam,Hk Sent from Yahoo Mail on Android On Fri, Jul 28, 2017 at 21:17, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Sudah saya ekstrak di drive C: (lengkapnya : C:\CombineTestRev)dan di file master di sheet 2, cell A2 sy ganti dengan C:\CombineTestRev setelah saya tekan tombol datanya masing kosong. Terima Kasih atas pencerahannya, Odhy. On Fri Jul 28 2017 02:00:51 GMT+0700 (SE Asia Standard Time), hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Hai Odhy, .zip filenya harus diextract dulu ke salah satu Dir, mis.D: Filenya dibuka dari Sub Folder itu, bukan lgs dari .zip file. Silakan dicoba lagi. Salam,HK Sent from Yahoo Mail on Android On Thu, Jul 27, 2017 at 17:21, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Saya sudah coba filenya tapi hasilnya kosong , kira2 salahnya dimana? sya ganti patch sprt dibawah ini : Set objFs = CreateObject("Scripting.FileSystemObject") Set objFolder = objFs.GetFolder("C:\Users\Fhakim3\AppData\Local\My Private Documents\ Tutorial\New folder\CombineTestRev") ' THE PATH FOR THE FILES Terima Kasih atas pencerahannya, Odhy. On Friday, July 21, 2017 10:55:31 AM WIB, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Sebagai tambahan...file master boleh berada (disimpan) di Dir. apa saja. ----- Forwarded Message -----From: hendrik karnadi [email protected] [belajar-excel] <[email protected]>To: BeExcel <[email protected]>Sent: Friday, July 21, 2017, 10:47:43 AM GMT+7Subject: [belajar-excel] Mengcopy data dari banyak files dalam keadaan tertutup (seluruh files yang akan diambil datanya berada dalam satu folder) [1 Attachment] Dear Be-Excel, Hasil utak atik bahan dari internet saya menemukan cara bagaimana mengcopy semua data di atas dalam bentuk value. Buat saya ini hal yang cukup menarik, bagaimana kita bisa membaca seluruh data diatas hanya dalam 1 sheet, sehingga saya mencoba mensharingkannya disini dalam bentuk .rar.Silakan diextract ke salah satu directory, mis. D: Contoh yang saya lampirkan di sini adalah hasil modifikasi dari 2 sumber di internet.Ilustrasinya adalah sebagai berikut : - Saya mempunyai satu file gabungan (sebut saja Master, boleh pakai nama lain) dimana sheet1 saya jadikan tempat untuk mengcopy seluruh data dalam bentuk value.- Sheet2 sel A1 saya isi dengan nama file gabungan tersebut dan sel A2 saya isi dengan Directory dari files yang akan saya ambil datanya. Files bisa terdiri dari banyak file dan jumlah sheets dari masing2 file tidak harus sama dan boleh kosong. Nama files dan sheets boleh apa saja. Dalam hasil rekap saya sebutkan sumbernya (nama file dan sheetnya). Selamat mencoba dan silakan dikembangkan lebih lanjut. Salam,HK On Thu, Jul 27, 2017 at 17:21, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Saya sudah coba filenya tapi hasilnya kosong , kira2 salahnya dimana? sya ganti patch sprt dibawah ini : Set objFs = CreateObject("Scripting.FileSystemObject") Set objFolder = objFs.GetFolder("C:\Users\Fhakim3\AppData\Local\My Private Documents\ Tutorial\New folder\CombineTestRev") ' THE PATH FOR THE FILES Terima Kasih atas pencerahannya, Odhy. On Friday, July 21, 2017 10:55:31 AM WIB, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Sebagai tambahan...file master boleh berada (disimpan) di Dir. apa saja. ----- Forwarded Message -----From: hendrik karnadi [email protected] [belajar-excel] <[email protected]>To: BeExcel <[email protected]>Sent: Friday, July 21, 2017, 10:47:43 AM GMT+7Subject: [belajar-excel] Mengcopy data dari banyak files dalam keadaan tertutup (seluruh files yang akan diambil datanya berada dalam satu folder) [1 Attachment] Dear Be-Excel, Hasil utak atik bahan dari internet saya menemukan cara bagaimana mengcopy semua data di atas dalam bentuk value. Buat saya ini hal yang cukup menarik, bagaimana kita bisa membaca seluruh data diatas hanya dalam 1 sheet, sehingga saya mencoba mensharingkannya disini dalam bentuk .rar.Silakan diextract ke salah satu directory, mis. D: Contoh yang saya lampirkan di sini adalah hasil modifikasi dari 2 sumber di internet.Ilustrasinya adalah sebagai berikut : - Saya mempunyai satu file gabungan (sebut saja Master, boleh pakai nama lain) dimana sheet1 saya jadikan tempat untuk mengcopy seluruh data dalam bentuk value.- Sheet2 sel A1 saya isi dengan nama file gabungan tersebut dan sel A2 saya isi dengan Directory dari files yang akan saya ambil datanya. Files bisa terdiri dari banyak file dan jumlah sheets dari masing2 file tidak harus sama dan boleh kosong. Nama files dan sheets boleh apa saja. Dalam hasil rekap saya sebutkan sumbernya (nama file dan sheetnya). Selamat mencoba dan silakan dikembangkan lebih lanjut. Salam,HK #yiv7480228092 #yiv7480228092 -- #yiv7480228092ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7480228092 #yiv7480228092ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7480228092 #yiv7480228092ygrp-mkp #yiv7480228092hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7480228092 #yiv7480228092ygrp-mkp #yiv7480228092ads {margin-bottom:10px;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad {padding:0 0;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad p {margin:0;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad a {color:#0000ff;text-decoration:none;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc {font-family:Arial;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc #yiv7480228092hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc .yiv7480228092ad {margin-bottom:10px;padding:0 0;}#yiv7480228092 #yiv7480228092actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7480228092 #yiv7480228092activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7480228092 #yiv7480228092activity span {font-weight:700;}#yiv7480228092 #yiv7480228092activity span:first-child {text-transform:uppercase;}#yiv7480228092 #yiv7480228092activity span a {color:#5085b6;text-decoration:none;}#yiv7480228092 #yiv7480228092activity span span {color:#ff7900;}#yiv7480228092 #yiv7480228092activity span .yiv7480228092underline {text-decoration:underline;}#yiv7480228092 .yiv7480228092attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7480228092 .yiv7480228092attach div a {text-decoration:none;}#yiv7480228092 .yiv7480228092attach img {border:none;padding-right:5px;}#yiv7480228092 .yiv7480228092attach label {display:block;margin-bottom:5px;}#yiv7480228092 .yiv7480228092attach label a {text-decoration:none;}#yiv7480228092 blockquote {margin:0 0 0 4px;}#yiv7480228092 .yiv7480228092bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7480228092 .yiv7480228092bold a {text-decoration:none;}#yiv7480228092 dd.yiv7480228092last p a {font-family:Verdana;font-weight:700;}#yiv7480228092 dd.yiv7480228092last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7480228092 dd.yiv7480228092last p span.yiv7480228092yshortcuts {margin-right:0;}#yiv7480228092 div.yiv7480228092attach-table div div a {text-decoration:none;}#yiv7480228092 div.yiv7480228092attach-table {width:400px;}#yiv7480228092 div.yiv7480228092file-title a, #yiv7480228092 div.yiv7480228092file-title a:active, #yiv7480228092 div.yiv7480228092file-title a:hover, #yiv7480228092 div.yiv7480228092file-title a:visited {text-decoration:none;}#yiv7480228092 div.yiv7480228092photo-title a, #yiv7480228092 div.yiv7480228092photo-title a:active, #yiv7480228092 div.yiv7480228092photo-title a:hover, #yiv7480228092 div.yiv7480228092photo-title a:visited {text-decoration:none;}#yiv7480228092 div#yiv7480228092ygrp-mlmsg #yiv7480228092ygrp-msg p a span.yiv7480228092yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7480228092 .yiv7480228092green {color:#628c2a;}#yiv7480228092 .yiv7480228092MsoNormal {margin:0 0 0 0;}#yiv7480228092 o {font-size:0;}#yiv7480228092 #yiv7480228092photos div {float:left;width:72px;}#yiv7480228092 #yiv7480228092photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv7480228092 #yiv7480228092photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7480228092 #yiv7480228092reco-category {font-size:77%;}#yiv7480228092 #yiv7480228092reco-desc {font-size:77%;}#yiv7480228092 .yiv7480228092replbq {margin:4px;}#yiv7480228092 #yiv7480228092ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7480228092 #yiv7480228092ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7480228092 #yiv7480228092ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7480228092 #yiv7480228092ygrp-mlmsg select, #yiv7480228092 input, #yiv7480228092 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7480228092 #yiv7480228092ygrp-mlmsg pre, #yiv7480228092 code {font:115% monospace;}#yiv7480228092 #yiv7480228092ygrp-mlmsg * {line-height:1.22em;}#yiv7480228092 #yiv7480228092ygrp-mlmsg #yiv7480228092logo {padding-bottom:10px;}#yiv7480228092 #yiv7480228092ygrp-msg p a {font-family:Verdana;}#yiv7480228092 #yiv7480228092ygrp-msg p#yiv7480228092attach-count span {color:#1E66AE;font-weight:700;}#yiv7480228092 #yiv7480228092ygrp-reco #yiv7480228092reco-head {color:#ff7900;font-weight:700;}#yiv7480228092 #yiv7480228092ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov li a {font-size:130%;text-decoration:none;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov ul {margin:0;padding:0 0 0 8px;}#yiv7480228092 #yiv7480228092ygrp-text {font-family:Georgia;}#yiv7480228092 #yiv7480228092ygrp-text p {margin:0 0 1em 0;}#yiv7480228092 #yiv7480228092ygrp-text tt {font-size:120%;}#yiv7480228092 #yiv7480228092ygrp-vital ul li:last-child {border-right:none !important;}#yiv7480228092 On Fri, Jul 28, 2017 at 23:43, rodhy hakim [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr HK, Sudah sesuai tidak yg sy rubah, file master masih dlm folder gabungan.. Dikirim dari iPhone saya Pada 28 Jul 2017, pukul 23.02, hendrik karnadi [email protected] [belajar-excel] <[email protected]> menulis: Hai Odhy, Nama File di Sheet2 Range("A1") sdh sesuai dengan nama file gabungannya (dalam contoh saya namanya "Master") ? Salam,Hk Sent from Yahoo Mail on Android On Fri, Jul 28, 2017 at 21:17, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Sudah saya ekstrak di drive C: (lengkapnya : C:\CombineTestRev)dan di file master di sheet 2, cell A2 sy ganti dengan C:\CombineTestRev setelah saya tekan tombol datanya masing kosong. Terima Kasih atas pencerahannya, Odhy. On Fri Jul 28 2017 02:00:51 GMT+0700 (SE Asia Standard Time), hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Hai Odhy, .zip filenya harus diextract dulu ke salah satu Dir, mis.D: Filenya dibuka dari Sub Folder itu, bukan lgs dari .zip file. Silakan dicoba lagi. Salam,HK Sent from Yahoo Mail on Android On Thu, Jul 27, 2017 at 17:21, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Saya sudah coba filenya tapi hasilnya kosong , kira2 salahnya dimana? sya ganti patch sprt dibawah ini : Set objFs = CreateObject("Scripting.FileSystemObject") Set objFolder = objFs.GetFolder("C:\Users\Fhakim3\AppData\Local\My Private Documents\ Tutorial\New folder\CombineTestRev") ' THE PATH FOR THE FILES Terima Kasih atas pencerahannya, Odhy. On Friday, July 21, 2017 10:55:31 AM WIB, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Sebagai tambahan...file master boleh berada (disimpan) di Dir. apa saja. ----- Forwarded Message -----From: hendrik karnadi [email protected] [belajar-excel] <[email protected]>To: BeExcel <[email protected]>Sent: Friday, July 21, 2017, 10:47:43 AM GMT+7Subject: [belajar-excel] Mengcopy data dari banyak files dalam keadaan tertutup (seluruh files yang akan diambil datanya berada dalam satu folder) [1 Attachment] Dear Be-Excel, Hasil utak atik bahan dari internet saya menemukan cara bagaimana mengcopy semua data di atas dalam bentuk value. Buat saya ini hal yang cukup menarik, bagaimana kita bisa membaca seluruh data diatas hanya dalam 1 sheet, sehingga saya mencoba mensharingkannya disini dalam bentuk .rar.Silakan diextract ke salah satu directory, mis. D: Contoh yang saya lampirkan di sini adalah hasil modifikasi dari 2 sumber di internet.Ilustrasinya adalah sebagai berikut : - Saya mempunyai satu file gabungan (sebut saja Master, boleh pakai nama lain) dimana sheet1 saya jadikan tempat untuk mengcopy seluruh data dalam bentuk value.- Sheet2 sel A1 saya isi dengan nama file gabungan tersebut dan sel A2 saya isi dengan Directory dari files yang akan saya ambil datanya. Files bisa terdiri dari banyak file dan jumlah sheets dari masing2 file tidak harus sama dan boleh kosong. Nama files dan sheets boleh apa saja. Dalam hasil rekap saya sebutkan sumbernya (nama file dan sheetnya). Selamat mencoba dan silakan dikembangkan lebih lanjut. Salam,HK On Thu, Jul 27, 2017 at 17:21, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Saya sudah coba filenya tapi hasilnya kosong , kira2 salahnya dimana? sya ganti patch sprt dibawah ini : Set objFs = CreateObject("Scripting.FileSystemObject") Set objFolder = objFs.GetFolder("C:\Users\Fhakim3\AppData\Local\My Private Documents\ Tutorial\New folder\CombineTestRev") ' THE PATH FOR THE FILES Terima Kasih atas pencerahannya, Odhy. On Friday, July 21, 2017 10:55:31 AM WIB, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Sebagai tambahan...file master boleh berada (disimpan) di Dir. apa saja. ----- Forwarded Message -----From: hendrik karnadi [email protected] [belajar-excel] <[email protected]>To: BeExcel <[email protected]>Sent: Friday, July 21, 2017, 10:47:43 AM GMT+7Subject: [belajar-excel] Mengcopy data dari banyak files dalam keadaan tertutup (seluruh files yang akan diambil datanya berada dalam satu folder) [1 Attachment] Dear Be-Excel, Hasil utak atik bahan dari internet saya menemukan cara bagaimana mengcopy semua data di atas dalam bentuk value. Buat saya ini hal yang cukup menarik, bagaimana kita bisa membaca seluruh data diatas hanya dalam 1 sheet, sehingga saya mencoba mensharingkannya disini dalam bentuk .rar.Silakan diextract ke salah satu directory, mis. D: Contoh yang saya lampirkan di sini adalah hasil modifikasi dari 2 sumber di internet.Ilustrasinya adalah sebagai berikut : - Saya mempunyai satu file gabungan (sebut saja Master, boleh pakai nama lain) dimana sheet1 saya jadikan tempat untuk mengcopy seluruh data dalam bentuk value.- Sheet2 sel A1 saya isi dengan nama file gabungan tersebut dan sel A2 saya isi dengan Directory dari files yang akan saya ambil datanya. Files bisa terdiri dari banyak file dan jumlah sheets dari masing2 file tidak harus sama dan boleh kosong. Nama files dan sheets boleh apa saja. Dalam hasil rekap saya sebutkan sumbernya (nama file dan sheetnya). Selamat mencoba dan silakan dikembangkan lebih lanjut. Salam,HK #yiv7480228092 #yiv7480228092 -- #yiv7480228092ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7480228092 #yiv7480228092ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7480228092 #yiv7480228092ygrp-mkp #yiv7480228092hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7480228092 #yiv7480228092ygrp-mkp #yiv7480228092ads {margin-bottom:10px;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad {padding:0 0;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad p {margin:0;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad a {color:#0000ff;text-decoration:none;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc {font-family:Arial;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc #yiv7480228092hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc .yiv7480228092ad {margin-bottom:10px;padding:0 0;}#yiv7480228092 #yiv7480228092actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7480228092 #yiv7480228092activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7480228092 #yiv7480228092activity span {font-weight:700;}#yiv7480228092 #yiv7480228092activity span:first-child {text-transform:uppercase;}#yiv7480228092 #yiv7480228092activity span a {color:#5085b6;text-decoration:none;}#yiv7480228092 #yiv7480228092activity span span {color:#ff7900;}#yiv7480228092 #yiv7480228092activity span .yiv7480228092underline {text-decoration:underline;}#yiv7480228092 .yiv7480228092attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7480228092 .yiv7480228092attach div a {text-decoration:none;}#yiv7480228092 .yiv7480228092attach img {border:none;padding-right:5px;}#yiv7480228092 .yiv7480228092attach label {display:block;margin-bottom:5px;}#yiv7480228092 .yiv7480228092attach label a {text-decoration:none;}#yiv7480228092 blockquote {margin:0 0 0 4px;}#yiv7480228092 .yiv7480228092bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7480228092 .yiv7480228092bold a {text-decoration:none;}#yiv7480228092 dd.yiv7480228092last p a {font-family:Verdana;font-weight:700;}#yiv7480228092 dd.yiv7480228092last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7480228092 dd.yiv7480228092last p span.yiv7480228092yshortcuts {margin-right:0;}#yiv7480228092 div.yiv7480228092attach-table div div a {text-decoration:none;}#yiv7480228092 div.yiv7480228092attach-table {width:400px;}#yiv7480228092 div.yiv7480228092file-title a, #yiv7480228092 div.yiv7480228092file-title a:active, #yiv7480228092 div.yiv7480228092file-title a:hover, #yiv7480228092 div.yiv7480228092file-title a:visited {text-decoration:none;}#yiv7480228092 div.yiv7480228092photo-title a, #yiv7480228092 div.yiv7480228092photo-title a:active, #yiv7480228092 div.yiv7480228092photo-title a:hover, #yiv7480228092 div.yiv7480228092photo-title a:visited {text-decoration:none;}#yiv7480228092 div#yiv7480228092ygrp-mlmsg #yiv7480228092ygrp-msg p a span.yiv7480228092yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7480228092 .yiv7480228092green {color:#628c2a;}#yiv7480228092 .yiv7480228092MsoNormal {margin:0 0 0 0;}#yiv7480228092 o {font-size:0;}#yiv7480228092 #yiv7480228092photos div {float:left;width:72px;}#yiv7480228092 #yiv7480228092photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv7480228092 #yiv7480228092photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7480228092 #yiv7480228092reco-category {font-size:77%;}#yiv7480228092 #yiv7480228092reco-desc {font-size:77%;}#yiv7480228092 .yiv7480228092replbq {margin:4px;}#yiv7480228092 #yiv7480228092ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7480228092 #yiv7480228092ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7480228092 #yiv7480228092ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7480228092 #yiv7480228092ygrp-mlmsg select, #yiv7480228092 input, #yiv7480228092 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7480228092 #yiv7480228092ygrp-mlmsg pre, #yiv7480228092 code {font:115% monospace;}#yiv7480228092 #yiv7480228092ygrp-mlmsg * {line-height:1.22em;}#yiv7480228092 #yiv7480228092ygrp-mlmsg #yiv7480228092logo {padding-bottom:10px;}#yiv7480228092 #yiv7480228092ygrp-msg p a {font-family:Verdana;}#yiv7480228092 #yiv7480228092ygrp-msg p#yiv7480228092attach-count span {color:#1E66AE;font-weight:700;}#yiv7480228092 #yiv7480228092ygrp-reco #yiv7480228092reco-head {color:#ff7900;font-weight:700;}#yiv7480228092 #yiv7480228092ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov li a {font-size:130%;text-decoration:none;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov ul {margin:0;padding:0 0 0 8px;}#yiv7480228092 #yiv7480228092ygrp-text {font-family:Georgia;}#yiv7480228092 #yiv7480228092ygrp-text p {margin:0 0 1em 0;}#yiv7480228092 #yiv7480228092ygrp-text tt {font-size:120%;}#yiv7480228092 #yiv7480228092ygrp-vital ul li:last-child {border-right:none !important;}#yiv7480228092 On Fri, Jul 28, 2017 at 23:43, rodhy hakim [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr HK, Sudah sesuai tidak yg sy rubah, file master masih dlm folder gabungan.. Dikirim dari iPhone saya Pada 28 Jul 2017, pukul 23.02, hendrik karnadi [email protected] [belajar-excel] <[email protected]> menulis: Hai Odhy, Nama File di Sheet2 Range("A1") sdh sesuai dengan nama file gabungannya (dalam contoh saya namanya "Master") ? Salam,Hk Sent from Yahoo Mail on Android On Fri, Jul 28, 2017 at 21:17, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Sudah saya ekstrak di drive C: (lengkapnya : C:\CombineTestRev)dan di file master di sheet 2, cell A2 sy ganti dengan C:\CombineTestRev setelah saya tekan tombol datanya masing kosong. Terima Kasih atas pencerahannya, Odhy. On Fri Jul 28 2017 02:00:51 GMT+0700 (SE Asia Standard Time), hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Hai Odhy, .zip filenya harus diextract dulu ke salah satu Dir, mis.D: Filenya dibuka dari Sub Folder itu, bukan lgs dari .zip file. Silakan dicoba lagi. Salam,HK Sent from Yahoo Mail on Android On Thu, Jul 27, 2017 at 17:21, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Saya sudah coba filenya tapi hasilnya kosong , kira2 salahnya dimana? sya ganti patch sprt dibawah ini : Set objFs = CreateObject("Scripting.FileSystemObject") Set objFolder = objFs.GetFolder("C:\Users\Fhakim3\AppData\Local\My Private Documents\ Tutorial\New folder\CombineTestRev") ' THE PATH FOR THE FILES Terima Kasih atas pencerahannya, Odhy. On Friday, July 21, 2017 10:55:31 AM WIB, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Sebagai tambahan...file master boleh berada (disimpan) di Dir. apa saja. ----- Forwarded Message -----From: hendrik karnadi [email protected] [belajar-excel] <[email protected]>To: BeExcel <[email protected]>Sent: Friday, July 21, 2017, 10:47:43 AM GMT+7Subject: [belajar-excel] Mengcopy data dari banyak files dalam keadaan tertutup (seluruh files yang akan diambil datanya berada dalam satu folder) [1 Attachment] Dear Be-Excel, Hasil utak atik bahan dari internet saya menemukan cara bagaimana mengcopy semua data di atas dalam bentuk value. Buat saya ini hal yang cukup menarik, bagaimana kita bisa membaca seluruh data diatas hanya dalam 1 sheet, sehingga saya mencoba mensharingkannya disini dalam bentuk .rar.Silakan diextract ke salah satu directory, mis. D: Contoh yang saya lampirkan di sini adalah hasil modifikasi dari 2 sumber di internet.Ilustrasinya adalah sebagai berikut : - Saya mempunyai satu file gabungan (sebut saja Master, boleh pakai nama lain) dimana sheet1 saya jadikan tempat untuk mengcopy seluruh data dalam bentuk value.- Sheet2 sel A1 saya isi dengan nama file gabungan tersebut dan sel A2 saya isi dengan Directory dari files yang akan saya ambil datanya. Files bisa terdiri dari banyak file dan jumlah sheets dari masing2 file tidak harus sama dan boleh kosong. Nama files dan sheets boleh apa saja. Dalam hasil rekap saya sebutkan sumbernya (nama file dan sheetnya). Selamat mencoba dan silakan dikembangkan lebih lanjut. Salam,HK On Thu, Jul 27, 2017 at 17:21, Odhy [email protected] [belajar-excel]<[email protected]> wrote: Dear Mr. Hendrik,Saya sudah coba filenya tapi hasilnya kosong , kira2 salahnya dimana? sya ganti patch sprt dibawah ini : Set objFs = CreateObject("Scripting.FileSystemObject") Set objFolder = objFs.GetFolder("C:\Users\Fhakim3\AppData\Local\My Private Documents\ Tutorial\New folder\CombineTestRev") ' THE PATH FOR THE FILES Terima Kasih atas pencerahannya, Odhy. On Friday, July 21, 2017 10:55:31 AM WIB, hendrik karnadi [email protected] [belajar-excel] <[email protected]> wrote: Sebagai tambahan...file master boleh berada (disimpan) di Dir. apa saja. ----- Forwarded Message -----From: hendrik karnadi [email protected] [belajar-excel] <[email protected]>To: BeExcel <[email protected]>Sent: Friday, July 21, 2017, 10:47:43 AM GMT+7Subject: [belajar-excel] Mengcopy data dari banyak files dalam keadaan tertutup (seluruh files yang akan diambil datanya berada dalam satu folder) [1 Attachment] Dear Be-Excel, Hasil utak atik bahan dari internet saya menemukan cara bagaimana mengcopy semua data di atas dalam bentuk value. Buat saya ini hal yang cukup menarik, bagaimana kita bisa membaca seluruh data diatas hanya dalam 1 sheet, sehingga saya mencoba mensharingkannya disini dalam bentuk .rar.Silakan diextract ke salah satu directory, mis. D: Contoh yang saya lampirkan di sini adalah hasil modifikasi dari 2 sumber di internet.Ilustrasinya adalah sebagai berikut : - Saya mempunyai satu file gabungan (sebut saja Master, boleh pakai nama lain) dimana sheet1 saya jadikan tempat untuk mengcopy seluruh data dalam bentuk value.- Sheet2 sel A1 saya isi dengan nama file gabungan tersebut dan sel A2 saya isi dengan Directory dari files yang akan saya ambil datanya. Files bisa terdiri dari banyak file dan jumlah sheets dari masing2 file tidak harus sama dan boleh kosong. Nama files dan sheets boleh apa saja. Dalam hasil rekap saya sebutkan sumbernya (nama file dan sheetnya). Selamat mencoba dan silakan dikembangkan lebih lanjut. Salam,HK #yiv7480228092 #yiv7480228092 -- #yiv7480228092ygrp-mkp {border:1px solid #d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv7480228092 #yiv7480228092ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv7480228092 #yiv7480228092ygrp-mkp #yiv7480228092hd {color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px 0;}#yiv7480228092 #yiv7480228092ygrp-mkp #yiv7480228092ads {margin-bottom:10px;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad {padding:0 0;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad p {margin:0;}#yiv7480228092 #yiv7480228092ygrp-mkp .yiv7480228092ad a {color:#0000ff;text-decoration:none;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc {font-family:Arial;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc #yiv7480228092hd {margin:10px 0px;font-weight:700;font-size:78%;line-height:122%;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ygrp-lc .yiv7480228092ad {margin-bottom:10px;padding:0 0;}#yiv7480228092 #yiv7480228092actions {font-family:Verdana;font-size:11px;padding:10px 0;}#yiv7480228092 #yiv7480228092activity {background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv7480228092 #yiv7480228092activity span {font-weight:700;}#yiv7480228092 #yiv7480228092activity span:first-child {text-transform:uppercase;}#yiv7480228092 #yiv7480228092activity span a {color:#5085b6;text-decoration:none;}#yiv7480228092 #yiv7480228092activity span span {color:#ff7900;}#yiv7480228092 #yiv7480228092activity span .yiv7480228092underline {text-decoration:underline;}#yiv7480228092 .yiv7480228092attach {clear:both;display:table;font-family:Arial;font-size:12px;padding:10px 0;width:400px;}#yiv7480228092 .yiv7480228092attach div a {text-decoration:none;}#yiv7480228092 .yiv7480228092attach img {border:none;padding-right:5px;}#yiv7480228092 .yiv7480228092attach label {display:block;margin-bottom:5px;}#yiv7480228092 .yiv7480228092attach label a {text-decoration:none;}#yiv7480228092 blockquote {margin:0 0 0 4px;}#yiv7480228092 .yiv7480228092bold {font-family:Arial;font-size:13px;font-weight:700;}#yiv7480228092 .yiv7480228092bold a {text-decoration:none;}#yiv7480228092 dd.yiv7480228092last p a {font-family:Verdana;font-weight:700;}#yiv7480228092 dd.yiv7480228092last p span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv7480228092 dd.yiv7480228092last p span.yiv7480228092yshortcuts {margin-right:0;}#yiv7480228092 div.yiv7480228092attach-table div div a {text-decoration:none;}#yiv7480228092 div.yiv7480228092attach-table {width:400px;}#yiv7480228092 div.yiv7480228092file-title a, #yiv7480228092 div.yiv7480228092file-title a:active, #yiv7480228092 div.yiv7480228092file-title a:hover, #yiv7480228092 div.yiv7480228092file-title a:visited {text-decoration:none;}#yiv7480228092 div.yiv7480228092photo-title a, #yiv7480228092 div.yiv7480228092photo-title a:active, #yiv7480228092 div.yiv7480228092photo-title a:hover, #yiv7480228092 div.yiv7480228092photo-title a:visited {text-decoration:none;}#yiv7480228092 div#yiv7480228092ygrp-mlmsg #yiv7480228092ygrp-msg p a span.yiv7480228092yshortcuts {font-family:Verdana;font-size:10px;font-weight:normal;}#yiv7480228092 .yiv7480228092green {color:#628c2a;}#yiv7480228092 .yiv7480228092MsoNormal {margin:0 0 0 0;}#yiv7480228092 o {font-size:0;}#yiv7480228092 #yiv7480228092photos div {float:left;width:72px;}#yiv7480228092 #yiv7480228092photos div div {border:1px solid #666666;min-height:62px;overflow:hidden;width:62px;}#yiv7480228092 #yiv7480228092photos div label {color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv7480228092 #yiv7480228092reco-category {font-size:77%;}#yiv7480228092 #yiv7480228092reco-desc {font-size:77%;}#yiv7480228092 .yiv7480228092replbq {margin:4px;}#yiv7480228092 #yiv7480228092ygrp-actbar div a:first-child {margin-right:2px;padding-right:5px;}#yiv7480228092 #yiv7480228092ygrp-mlmsg {font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv7480228092 #yiv7480228092ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv7480228092 #yiv7480228092ygrp-mlmsg select, #yiv7480228092 input, #yiv7480228092 textarea {font:99% Arial, Helvetica, clean, sans-serif;}#yiv7480228092 #yiv7480228092ygrp-mlmsg pre, #yiv7480228092 code {font:115% monospace;}#yiv7480228092 #yiv7480228092ygrp-mlmsg * {line-height:1.22em;}#yiv7480228092 #yiv7480228092ygrp-mlmsg #yiv7480228092logo {padding-bottom:10px;}#yiv7480228092 #yiv7480228092ygrp-msg p a {font-family:Verdana;}#yiv7480228092 #yiv7480228092ygrp-msg p#yiv7480228092attach-count span {color:#1E66AE;font-weight:700;}#yiv7480228092 #yiv7480228092ygrp-reco #yiv7480228092reco-head {color:#ff7900;font-weight:700;}#yiv7480228092 #yiv7480228092ygrp-reco {margin-bottom:20px;padding:0px;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov li a {font-size:130%;text-decoration:none;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov li {font-size:77%;list-style-type:square;padding:6px 0;}#yiv7480228092 #yiv7480228092ygrp-sponsor #yiv7480228092ov ul {margin:0;padding:0 0 0 8px;}#yiv7480228092 #yiv7480228092ygrp-text {font-family:Georgia;}#yiv7480228092 #yiv7480228092ygrp-text p {margin:0 0 1em 0;}#yiv7480228092 #yiv7480228092ygrp-text tt {font-size:120%;}#yiv7480228092 #yiv7480228092ygrp-vital ul li:last-child {border-right:none !important;}#yiv7480228092
