轉自EXCEL不加班
學員的案例:每個銀行賬戶用一張表,然後将每個銀行的餘額自動引用到彙總表。
原來A列的工作表名稱,學員自己寫的不規範,什麼格式都有。盧子用一段簡單的代碼将工作表名稱獲取過來,這樣後期統計就更簡單。
源代碼:
Sub 提取工作表() Dim i% For i = 1 To Sheets.Count k = k 1 Cells(k, 1) = Sheets(i).Name NextEnd Sub
如果不懂得使用代碼,請點開這篇文章:一鍵生成目錄(完善版)
每個賬戶的餘額,都是在E列,現在要根據最後一個日期,查找最後一行的餘額。
既然是現金日記賬,記錄的日期肯定是小于或者等于今天所在日期,也就是說可以用TODAY函數進行查找日期所對應的餘額。
=LOOKUP(TODAY(),'建行(7777)'!A:E)
關于引用工作表名稱,以前寫過很多文章,這裡就簡單的說明一下。這裡有一個關鍵點,因為含有特殊符号,需要加單引号。
=LOOKUP(TODAY(),INDIRECT("'"&A2&"'!A:E"))
,
更多精彩资讯请关注tft每日頭條,我们将持续为您更新最新资讯!