此收尋vba增加萬用字元 - Excel程式區

[發問] 此收尋vba增加萬用字元

1^# 跳轉到 »

發表於 2013-5-3 13:43 | 顯示全部帖子

回復 20# die78325
這樣嗎?

Dim sName As String
For Each sName In Array("統一", "其他工作表")
With Sheets(sName) '統一工作表區段

'中略

End With '結束統一工作表區段敘述
Next

2^#

發表於 2013-5-3 15:29 | 顯示全部帖子

回復 22# die78325
阿阿 , 抱歉!
沒實際去跑沒發現這錯誤
把宣告的As String拿掉應該就可以了

靜思自在 : 【生命在呼吸間】佛陀說：「生命在呼吸間。」人無法管住自己的生命，更無法擋住死期，讓自己永住人間。既然生命去來這麼無常，我們更應該好好地愛惜它、利用它、充實它，讓這無常、寶貴的生命，散發它真善美的光輝，映照出生命真正的價值。