vbs 指定工作表

dou10801 2014-03-31 11:52:41 ‧ 2279 瀏覽

分享至

Set oexcel=CreateObject("excel.application")
Set obook=oexcel.Workbooks.Open("c:\test\excel.xls")
Set osheet=obook.Sheets(3)
msgbox osheet.cells(1,1)
Set obook=Nothing
Set osheet=Nothing
oexcel.Quit
為何 Set osheet=obook.Sheets(3)都顯示第一工作表,不能指定第三個
Set osheet=obook.Sheets("sheet3")可以,但不是我所要,謝謝!

登入發表討論

直播研討會

{{ item.channelVendor }} {{ item.webinarstarted }} |

直播中

3 個回答

海綿寶寶

iT邦大神 1 級 ‧ 2014-03-31 12:14:18

最佳解答

如果你有三張工作表的話
試著把

&lt;pre class="c" name="code">Set osheet=obook.Sheets(3)

裡的 3 改成 1 和 2 試試看
看看會指到那一張工作表

在 Excel 中
用「工作表名稱」會比「工作表索引編號」要來得好一點
因為工作表有可能新增和刪除
就算只是改個名字
你也就沒辦法從工作表名稱判斷他是編號第幾號的工作表了

回應
分享
檢舉

登入發表回應

fillano

iT邦超人 1 級 ‧ 2014-04-01 10:13:11

&lt;pre class="c" name="code">
osheet.Activate()

請善用msdn：http://msdn.microsoft.com/en-us/library/microsoft.office.interop.excel._worksheet.activate(v=office.15).aspx?cs-save-lang=1&cs-lang=vb#code-snippet-1

回應
分享
檢舉

登入發表回應

showjack

iT邦新手 1 級 ‧ 2014-04-01 13:48:23

底稿是可以透過拖曳而改變次序的, 所以sheets(3) 不一定是你所看到的第三張底稿
還是用底稿名來寫比較穩定

回應
分享
檢舉

登入發表回應

我要發表回答

立即登入回答

參賽組數

1064 組

團體組數

40 組

累計文章數

22200 篇

完賽人數

602 人

15th鐵人賽 16th鐵人賽 13th鐵人賽 14th鐵人賽 12th鐵人賽 11th鐵人賽鐵人賽 2019鐵人賽 javascript 2018鐵人賽 python 2017鐵人賽 windows php c# windows server linux css react vue.js

IT邦幫忙