返回列表 上一主題 發帖

[分享] 怎麼open csv檔案

[分享] 怎麼open csv檔案

本帖最後由 john2006168 於 2010-6-8 00:01 編輯

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 發表於 2010-6-5 23:40



    還是oobird版大細心,多虧您指正
學海無涯_不恥下問

TOP

        靜思自在 : 慈悲沒有敵人,智慧不起煩惱。
返回列表 上一主題