ªð¦^¦Cªí ¤W¤@¥DÃD µo©«

[µo°Ý] VBA ¦p¦ó¨Ì§Ç¶}±Ò EXCELÀɮשO

[µo°Ý] VBA ¦p¦ó¨Ì§Ç¶}±Ò EXCELÀɮשO

¥»©«³Ì«á¥Ñ ag324 ©ó 2011-10-31 11:36 ½s¿è

Àɮ׬OCSV ÀÉ ¤£¹L¥ÎWorkbooks.Open Filename   dir/ xxx.xls
§Ú§â¥¦·í§@xls Àɮפ]¯à¶}

§Ú¦³¤@­Ó°ÝÃD
´N¬O§Ú¦³«Ü¦hÀÉ®× ­n²Î¾ã¸ê®Æ¨ì¤@­ÓÀÉ®×
ÀɦW¬°1.csv 2csv .....¨ì xxx,csv
¦b­Ó§O¶] VBA §â¸Ì­±ÀÉ®×·J¾ã¨ì§Ú¥t¥~¶}ªº¤@­ÓÀɮ׸Ì
§Ú¤º®e³£¼g¦n¤F
´N¬O¤£ª¾¹D «ç»òÅý¥L¶] ¶}±Ò 1.csv ¶]VBA µM«á¦A¶] 2.csv ¶]VBA
·PÁÂ



-----------------------------------------------------------------------
¦pªG­n¶]¦h­Ó¸ê®Æ§¨ ¸Ì­±ªº¦UÀÉ®× ¤S­n«ç»ò³]©O
¦U¸ê®Æ§¨¸Ì­±¤]¬O 1.csv 2.csv ...µ¥

­è­è¤~·j´M¨ìª©¥D¼gªº
For i = 6 To 6 + 6
        Workbooks.Open "D:\¤£¦P§÷®Æªºpattern¤ñ¸û 20110704\OF_Form_pol_v01\OF_Form_pol_v01@0." & i /10 & "GHz.csv" '>= ¶}±Ò²Ä¤@­ÓÀÉ®×

¦P¤@­Ó¸ê®Æ§¨¦U­ÓÀɮ׶}±Ò ¤w¸g¦¨¥\  
¤£¹L¦pªG­n¦b¦U­Ó¸ê®Æ§¨©O?
·PÁ¤j®a¤F

TOP

§Aªº¸ê®Æ§¨¦WºÙ¬O¦p¦ó½s±Æ? ¦p³o¼Ë?
d:\¤£¦P§÷®Æªºpattern¤ñ¸û 20110704\OF_Form_pol_v01\
d:\¤£¦P§÷®Æªºpattern¤ñ¸û 20110705\OF_Form_pol_v01\
¬Oªº¸Ü
  1. for j = 4 to 5
  2. For i = 6 To 6 + 6
  3.          Workbooks.Open "D:\¤£¦P§÷®Æªºpattern¤ñ¸û 201107" & format(j,"00") & "\OF_Form_pol_v01\OF_Form_pol_v01@0." & i /10 & "GHz.csv"
  4. next
  5. next
½Æ»s¥N½X
À´±oµo°Ý,µª®×´N·|¦b¨ä¤¤

¤µ¤éの¤@¬íは  ©ú¤éにない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

·PÁÂ ~ ¤w¸g¥i¥H¤F

TOP

³o°ÝÃD­è¦n§Ú¤]¦³¹J¹L
³o¸Ì¦­¨ìµª®×
·P®¦

TOP

        ÀR«ä¦Û¦b : ·R¤£¬O­n¨D¹ï¤è¡A¦Ó¬O­n¥Ñ¦Û¨­ªº¥I¥X¡C
ªð¦^¦Cªí ¤W¤@¥DÃD