[VB6 ] 程式連結excel位置的問題
Dim myxls As Object
Dim mybooks As Object
Dim mybook As Object
Dim mySht As Object
Dim myRange As Object
Dim a As Integer
Set myxls = CreateObject("Excel.Application") '''啟動Excel
Set mybooks = myxls.workbooks
Set mybook = mybooks.Open("1111.xls") '''開檔案
Set mySht = mybook.sheets(1) '''取得Sheet
以上是我連結excel程式的部份,有一些部份還不是很瞭解想請問。
然後我現在程式的最大問題,在於我原本的構想是只要執行檔跟excel在同一
個目錄就可以讀取到。可是我這個程式就算我excel放在跟專案位置同個目
錄也都讀取不到。只有放在"桌面"上的"我的文件"裡面程式才讀的到excel.
請問我該怎麼改呢?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 61.64.190.171
※ 編輯: sdwufei 來自: 61.64.190.171 (10/06 02:03)
推
10/07 01:27, , 1F
10/07 01:27, 1F
※ 編輯: sdwufei 來自: 61.64.145.220 (10/07 03:40)
推
10/07 06:09, , 2F
10/07 06:09, 2F
→
10/07 09:58, , 3F
10/07 09:58, 3F
→
10/07 15:59, , 4F
10/07 15:59, 4F