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

[¤À¨É] «ç»òopen csvÀÉ®×

[¤À¨É] «ç»òopen csvÀÉ®×

¥»©«³Ì«á¥Ñ john2006168 ©ó 2010-6-8 00:01 ½s¿è

Sub share()
  
    Dim myWb As Workbook
    Dim myFileName As String
    myFileName = "john.csv"                           
    Set myWb = Workbooks.Open(Filename:=ThisWorkbook.Path & "\" & myFileName)
    Set myWb = Nothing      

     End Sub

Set myWb = Workbooks.Open(Filename:=ThisWorkbook.Path & "\" & myFileName)

TOP

Set myWb = Workbooks.Open(Filename:=ThisWorkbook.Path & "\" & myFileName)
oobird µoªí©ó 2010-6-5 23:40



    ÁÙ¬Ooobirdª©¤j²Ó¤ß,¦hÁ«±z«ü¥¿
¾Ç®üµL²P_¤£®¢¤U°Ý

TOP

        ÀR«ä¦Û¦b : ¯¸¦b¥b¸ô¡A¤ñ¨«¨ì¥Ø¼Ð§ó¨¯­W¡C
ªð¦^¦Cªí ¤W¤@¥DÃD