Hai Fajar,Coba buat/copas Macro (Open File) berikut ini,Option Explicit
Sub BukaFile()
Dim Path As String Dim nm_file As Range Dim nm As Range Path =
Range("G1").Value & "\" 'sel G1 berisi (ditulis) Dir dan Sub Dir tempat dimana
file2 berada, mis D:\Coba Set nm_file = Range("H1", Range("H1").End(xlDown))
'Sel H1 dst. berisi nama2 file yang akan dibuka
For Each nm In nm_file On Error GoTo Pesan Workbooks.Open
Filename:=Path & nm Next nmPesan: MsgBox "SELESAI", vbCritical, "P E S A
N"End Sub
Salam,HK
From: "Fajar Fatahillah [email protected] [belajar-excel]"
<[email protected]>
To: [email protected]
Sent: Friday, 26 August 2016, 11:42
Subject: [belajar-excel] Looping Vba berdasarkan list tertentu [1 Attachment]
Dear Para Master Excel,saya ingin membuat aktivitas excel yang rutin
dikerjakan dan berdasarkan list terttentu yang berubah ubah,beberapa aktivitas
tersebut yaitu open file sesuai list di excel td, copy paste , dan save file as
sesuai list juga.
terlampir contoh excelnya
Mohon bantuannya ya
Best Regards, Fajar Fatahillah
#yiv1320986275 #yiv1320986275 -- #yiv1320986275ygrp-mkp {border:1px solid
#d8d8d8;font-family:Arial;margin:10px 0;padding:0 10px;}#yiv1320986275
#yiv1320986275ygrp-mkp hr {border:1px solid #d8d8d8;}#yiv1320986275
#yiv1320986275ygrp-mkp #yiv1320986275hd
{color:#628c2a;font-size:85%;font-weight:700;line-height:122%;margin:10px
0;}#yiv1320986275 #yiv1320986275ygrp-mkp #yiv1320986275ads
{margin-bottom:10px;}#yiv1320986275 #yiv1320986275ygrp-mkp .yiv1320986275ad
{padding:0 0;}#yiv1320986275 #yiv1320986275ygrp-mkp .yiv1320986275ad p
{margin:0;}#yiv1320986275 #yiv1320986275ygrp-mkp .yiv1320986275ad a
{color:#0000ff;text-decoration:none;}#yiv1320986275 #yiv1320986275ygrp-sponsor
#yiv1320986275ygrp-lc {font-family:Arial;}#yiv1320986275
#yiv1320986275ygrp-sponsor #yiv1320986275ygrp-lc #yiv1320986275hd {margin:10px
0px;font-weight:700;font-size:78%;line-height:122%;}#yiv1320986275
#yiv1320986275ygrp-sponsor #yiv1320986275ygrp-lc .yiv1320986275ad
{margin-bottom:10px;padding:0 0;}#yiv1320986275 #yiv1320986275actions
{font-family:Verdana;font-size:11px;padding:10px 0;}#yiv1320986275
#yiv1320986275activity
{background-color:#e0ecee;float:left;font-family:Verdana;font-size:10px;padding:10px;}#yiv1320986275
#yiv1320986275activity span {font-weight:700;}#yiv1320986275
#yiv1320986275activity span:first-child
{text-transform:uppercase;}#yiv1320986275 #yiv1320986275activity span a
{color:#5085b6;text-decoration:none;}#yiv1320986275 #yiv1320986275activity span
span {color:#ff7900;}#yiv1320986275 #yiv1320986275activity span
.yiv1320986275underline {text-decoration:underline;}#yiv1320986275
.yiv1320986275attach
{clear:both;display:table;font-family:Arial;font-size:12px;padding:10px
0;width:400px;}#yiv1320986275 .yiv1320986275attach div a
{text-decoration:none;}#yiv1320986275 .yiv1320986275attach img
{border:none;padding-right:5px;}#yiv1320986275 .yiv1320986275attach label
{display:block;margin-bottom:5px;}#yiv1320986275 .yiv1320986275attach label a
{text-decoration:none;}#yiv1320986275 blockquote {margin:0 0 0
4px;}#yiv1320986275 .yiv1320986275bold
{font-family:Arial;font-size:13px;font-weight:700;}#yiv1320986275
.yiv1320986275bold a {text-decoration:none;}#yiv1320986275 dd.yiv1320986275last
p a {font-family:Verdana;font-weight:700;}#yiv1320986275 dd.yiv1320986275last p
span {margin-right:10px;font-family:Verdana;font-weight:700;}#yiv1320986275
dd.yiv1320986275last p span.yiv1320986275yshortcuts
{margin-right:0;}#yiv1320986275 div.yiv1320986275attach-table div div a
{text-decoration:none;}#yiv1320986275 div.yiv1320986275attach-table
{width:400px;}#yiv1320986275 div.yiv1320986275file-title a, #yiv1320986275
div.yiv1320986275file-title a:active, #yiv1320986275
div.yiv1320986275file-title a:hover, #yiv1320986275 div.yiv1320986275file-title
a:visited {text-decoration:none;}#yiv1320986275 div.yiv1320986275photo-title a,
#yiv1320986275 div.yiv1320986275photo-title a:active, #yiv1320986275
div.yiv1320986275photo-title a:hover, #yiv1320986275
div.yiv1320986275photo-title a:visited {text-decoration:none;}#yiv1320986275
div#yiv1320986275ygrp-mlmsg #yiv1320986275ygrp-msg p a
span.yiv1320986275yshortcuts
{font-family:Verdana;font-size:10px;font-weight:normal;}#yiv1320986275
.yiv1320986275green {color:#628c2a;}#yiv1320986275 .yiv1320986275MsoNormal
{margin:0 0 0 0;}#yiv1320986275 o {font-size:0;}#yiv1320986275
#yiv1320986275photos div {float:left;width:72px;}#yiv1320986275
#yiv1320986275photos div div {border:1px solid
#666666;min-height:62px;overflow:hidden;width:62px;}#yiv1320986275
#yiv1320986275photos div label
{color:#666666;font-size:10px;overflow:hidden;text-align:center;white-space:nowrap;width:64px;}#yiv1320986275
#yiv1320986275reco-category {font-size:77%;}#yiv1320986275
#yiv1320986275reco-desc {font-size:77%;}#yiv1320986275 .yiv1320986275replbq
{margin:4px;}#yiv1320986275 #yiv1320986275ygrp-actbar div a:first-child
{margin-right:2px;padding-right:5px;}#yiv1320986275 #yiv1320986275ygrp-mlmsg
{font-size:13px;font-family:Arial, helvetica, clean, sans-serif;}#yiv1320986275
#yiv1320986275ygrp-mlmsg table {font-size:inherit;font:100%;}#yiv1320986275
#yiv1320986275ygrp-mlmsg select, #yiv1320986275 input, #yiv1320986275 textarea
{font:99% Arial, Helvetica, clean, sans-serif;}#yiv1320986275
#yiv1320986275ygrp-mlmsg pre, #yiv1320986275 code {font:115%
monospace;}#yiv1320986275 #yiv1320986275ygrp-mlmsg *
{line-height:1.22em;}#yiv1320986275 #yiv1320986275ygrp-mlmsg #yiv1320986275logo
{padding-bottom:10px;}#yiv1320986275 #yiv1320986275ygrp-msg p a
{font-family:Verdana;}#yiv1320986275 #yiv1320986275ygrp-msg
p#yiv1320986275attach-count span {color:#1E66AE;font-weight:700;}#yiv1320986275
#yiv1320986275ygrp-reco #yiv1320986275reco-head
{color:#ff7900;font-weight:700;}#yiv1320986275 #yiv1320986275ygrp-reco
{margin-bottom:20px;padding:0px;}#yiv1320986275 #yiv1320986275ygrp-sponsor
#yiv1320986275ov li a {font-size:130%;text-decoration:none;}#yiv1320986275
#yiv1320986275ygrp-sponsor #yiv1320986275ov li
{font-size:77%;list-style-type:square;padding:6px 0;}#yiv1320986275
#yiv1320986275ygrp-sponsor #yiv1320986275ov ul {margin:0;padding:0 0 0
8px;}#yiv1320986275 #yiv1320986275ygrp-text
{font-family:Georgia;}#yiv1320986275 #yiv1320986275ygrp-text p {margin:0 0 1em
0;}#yiv1320986275 #yiv1320986275ygrp-text tt {font-size:120%;}#yiv1320986275
#yiv1320986275ygrp-vital ul li:last-child {border-right:none
!important;}#yiv1320986275
