作者fumizuki (蒙面加菲狮)
看板Visual_Basic
标题Re: [VBA ] 计算目前总共开启的sheets?
时间Fri Nov 5 06:38:24 2010
※ 引述《geniuswen (firejimtracy.com)》之铭言：
: 请问怎麽记算目前总共开启的分页数?
: 譬如说现在我正打开着三个excel档案 每个档案都有三个分页 总共九页
: 感觉很简单 但是我想久就不知道要用甚麽funtion可以做
: 谢谢指教
c = 0
For i = 1 To WorkBooks.Count
For j = 1 To WorkBooks(i).WorkSheets.Count
c = c + 1
Next
Next
MsgBox c
--
▃▅▇▆▄ ▆▂▃ `
逝去感情如何能留住，半点痴情遗留殊不易，██▅▇▄▃ ▇▃▂" .
█████████▃i ▁▄▇
更多凄凄惨惨的遭遇…………██▆▃ █▅▆▃ˍ▄*
◢ ▂█▄▇▅▂▌.
我不知道，王～八～蛋～～！ ▂▆███ █▄▃ 。fumizuki。Check。
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 123.194.223.71
※ 编辑: fumizuki 来自: 123.194.223.71 (11/05 06:38)
1F：→ bulldog:内回圈似乎可以省略～ 11/05 09:34
2F：推 geniuswen:感恩!!! 11/05 16:54
3F：推 geniuswen:另外请教为什麽不能用worksheet()? 想要指定sheet name 11/05 16:58
4F：→ geniuswen:然後计算有多少笔 想了很久想不出来= = 11/05 16:58
5F：推 geniuswen:阿阿请忽略上面的问题XD 单纯我手误= = 11/05 17:34
6F：→ geniuswen:谢谢板大指教 11/05 17:35