[VBA ] 輸入已超過檔案結尾??
不好意思~因為我試著用vba下去寫東西~
可是執行的時候會出錯,偵測的結果『輸入已超過檔案結尾』
就是下面程式碼『Input #1, O11(i,j)』這一行
請問一下問題出在哪邊?
因為我是照著書這樣子打的~可以告訴我錯在哪嗎
Private Sub UserForm_Activate()
Dim i, j As Integer
Open "C:\O11.CSV.xls" For Input As #1
i = 0
While Not EOF(1)
For j = 1 To 9
Input #1, O11(i, j)
Next j
i = i + 1
Wend
Close #1
Open "C:\H11.CSV.xls" For Input As #1
i = 0
While Not EOF(1)
For j = 1 To 9
Input #1, H11(i, j)
Next j
i = i + 1
Wend
Close #1
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 122.125.209.148
討論串 (同標題文章)
以下文章回應了本文:
完整討論串 (本文為第 1 之 2 篇):
Visual_Basic 近期熱門文章
PTT數位生活區 即時熱門文章