123
返回列表 上一主題 發帖

[發問] 請問EXCEL怎麼取得工作表的數量與資料行數呢(跨工作表)!?謝謝

konkon3141

帖子
17 
主題
4 
精華
0 
積分
21 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
10 
註冊時間
2012-10-16 
最後登錄
2012-12-1 
11# 跳轉到 »
發表於 2012-10-28 20:22 | 只看該作者
回復  konkon3141
內容就是在C10 填入公式
=COUNTA(開始工作表:結束工作表!B:B)-COUNTA(開始工作表:結束 ...
stillfish00 發表於 2012-10-28 19:15



    大大這是我的檔案
    模具履歷.rar (33.4 KB)
    請大大幫我看一下
    我權限不夠大大處理好可以傳到網路空間嗎Q.Q...
     拜託了~~謝謝^^

TOP

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
12#
發表於 2012-10-28 21:20 | 只看該作者
回復 11# konkon3141
http://d.pr/f/Sxsz

最後發現問題在工作表名稱有含括號 , 所以在使用公式時工作表名稱要另外加單引號才不會出錯
啊啊~這算我沒養成良好習慣啦><

TOP

konkon3141

帖子
17 
主題
4 
精華
0 
積分
21 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
10 
註冊時間
2012-10-16 
最後登錄
2012-12-1 
13#
發表於 2012-10-28 21:32 | 只看該作者
回復  konkon3141
http://d.pr/f/Sxsz

最後發現問題在工作表名稱有含括號 , 所以在使用公式時工作表名 ...
stillfish00 發表於 2012-10-28 21:20



    大大我把( ) + &全改成-
    結果切換到目錄他一直要我開啟檔案= ="
    而且輸入資料也不會更新筆數..
    http://www.mediafire.com/?s6eqfqc4dj3wlz9
    另外為甚麼工作表名稱不能使用( )呢!?
    再此先謝謝大大的幫忙^^~~

TOP

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
14#
發表於 2012-10-28 21:44 | 只看該作者
回復 13# konkon3141
http://d.pr/f/Sxsz 這個檔案不能用嗎? 這是改過的

TOP

konkon3141

帖子
17 
主題
4 
精華
0 
積分
21 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
10 
註冊時間
2012-10-16 
最後登錄
2012-12-1 
15#
發表於 2012-10-28 22:06 | 只看該作者
回復  konkon3141
http://d.pr/f/Sxsz 這個檔案不能用嗎? 這是改過的
stillfish00 發表於 2012-10-28 21:44



這個可以了!!!
大大有改工作表名稱嗎!?
好像沒有改耶~~
沒有改工作是怎麼解決這個問題呢!?
在EYNY有人說工作表()會造成VBA引用儲存格能夠用的函數
所以很可能會混淆
再此感謝大大的幫忙^^~~
學習到很多EXCEL的知識

TOP

konkon3141

帖子
17 
主題
4 
精華
0 
積分
21 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
10 
註冊時間
2012-10-16 
最後登錄
2012-12-1 
16#
發表於 2012-10-28 22:15 | 只看該作者
另外請問大大我想把第3工作表"PC針模"~新手錶架(組)隱藏
但這樣會造成第1頁的數量無法計算耶...
目錄下方的超連結也會全部失效..

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
245  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-11-12 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
17#
發表於 2012-10-28 22:31 | 只看該作者
回復 13# konkon3141

自定義函數
  1. Function All_Data(sh As Range, sh1 As Range, MyType As Integer) As Double
  2. Application.Volatile
  3. For Each sht In Sheets
  4.   If sht.Name <> sh.Parent.Name And sht.Name <> sh1.Parent.Name Then
  5.      Rng = sh.Address(, , , , 0)
  6.      Rng1 = sh1.Address(, , , , 0)
  7.      Select Case MyType
  8.      Case 0
  9.      All_Data = All_Data + 1
  10.      Case Else
  11.      All_Data = All_Data + (Application.CountA(sht.Range(Rng)) - Application.CountA(sht.Range(Rng1)))
  12.      End Select
  13.   End If
  14. Next
  15. End Function
複製代碼
C9=All_Data(A1,空白格式!A1,0)
C10=All_Data('目錄&模具品名'!B:B,空白格式!B$1:B$8,1)
C11=All_Data('目錄&模具品名'!J:J,空白格式!J$1:J$8,1)
C12=All_Data('目錄&模具品名'!P:P,空白格式!P$1:P$8,1)
模具履歷.rar (46.42 KB)
學海無涯_不恥下問

TOP

konkon3141

帖子
17 
主題
4 
精華
0 
積分
21 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
10 
註冊時間
2012-10-16 
最後登錄
2012-12-1 
18#
發表於 2012-10-28 22:48 | 只看該作者
回復  konkon3141

自定義函數C9=All_Data(A1,空白格式!A1,0)
C10=All_Data('目錄&模具品名'!B:B,空白格 ...
Hsieh 發表於 2012-10-28 22:31



大大我論壇權限不夠
可以傳網路空間嗎@@!?
謝謝囉^^~~~

TOP

stillfish00

帖子
1018 
主題
15 
精華
0 
積分
1058 
點名
0  
作業系統
win7 32bit 
軟體版本
Office 2016 64-bit 
閱讀權限
50 
性別
男 
來自
桃園 
註冊時間
2012-5-9 
最後登錄
2022-9-28 
19#
發表於 2012-10-28 23:15 | 只看該作者
回復 16# konkon3141
隱藏工作表的超連結會失效是正常的..
另一種方法是工作表不隱藏 , 到Excel選項裡取消 工作表索引標籤
不過看用途啦  有時候會不太方便..

TOP

konkon3141

帖子
17 
主題
4 
精華
0 
積分
21 
點名
0  
作業系統
XP 
軟體版本
2003 
閱讀權限
10 
註冊時間
2012-10-16 
最後登錄
2012-12-1 
20#
發表於 2012-10-28 23:49 | 只看該作者
回復  konkon3141
隱藏工作表的超連結會失效是正常的..
另一種方法是工作表不隱藏 , 到Excel選項裡取消  ...
stillfish00 發表於 2012-10-28 23:15



在依莉有大大說如果嫌下表工作表索引標籤太多
可以考慮以檔案連結的方式
以我這個例子
就不知道有沒有1個工作表換成1個活頁簿的方法了
而且在目錄的統計量有辦法跨檔案計算嗎...這也是個大問題

取消工作表索引標籤還蠻不方便的@@
如果要新增工作表後要回空白格式 複製格式
真的非常麻煩..

感謝大大花了1天熱心的幫忙^^~~
學到了很多是學校不會教的知識~~

TOP

        靜思自在 : 盡多少本份，就得多少本事。
123
返回列表 上一主題