VFP 愛用者社區

wsk · 註冊時間: 2004-01-14 文章: 51 第 1 樓

請各位大大幫忙,

有一個 Excel 檔案, 內有多張 sheet, 每一張 sheet 都有一個名稱, 例如 "東南31", "雅達22" 等等,
請問怎樣可以在 VFP 內讀取每一張 sheet 的名稱及讓使用者決定匯入那幾張 sheets. 謝謝 Embarassed

garfield · 發表於: 星期一七月 11, 2005 2:56 pm 文章主題:

用 excel sheet 兩個條件來"搜尋 "
這個就是你要的.
http://vfp.sunyear.com.tw/viewtopic.php?t=1821&highlight=excel+sheet

wsk · 註冊時間: 2004-01-14 文章: 51 第 3 樓

謝謝 garfield 的回答. 我到現在仍未能解決此問題 -- 在不知道 Excel 檔內有多少張 sheets, 用VFP來讀取每一張 sheet 的名稱時,
會出現錯誤訊息.

wsk · 註冊時間: 2004-01-14 文章: 51 第 4 樓

如可以知道該 Excel 檔有多少張 sheets 就可以解決此問題.

garfield · 發表於: 星期五七月 22, 2005 9:36 pm 文章主題:

Objectexecl = createobject('excel.application')
with Objectexecl
.workbooks.open('xls檔案名')
mcount = .sheets.count
for i=1 to mcount
? .sheets(i).name
next
with

wsk · 註冊時間: 2004-01-14 文章: 51 第 6 樓

謝謝 garfield, 按您的指導, 已OK.

richshih · 註冊時間: 2007-10-11 文章: 153 第 7 樓

garfield · 發表於: 星期四十月 23, 2008 3:47 pm 文章主題:

.ActiveSheet.name

richshih · 註冊時間: 2007-10-11 文章: 153 第 9 樓