返回列表 上一主題 發帖

[分享] 怎麼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

        靜思自在 : 【蒙蔽的自由】人常在什麼都可以自由自在的時候,卻被這種隨心所欲的自由蒙蔽,虛擲時光而毫無覺知。
返回列表 上一主題