轉自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"))
分享到:
閱讀更多 學點EXCEL不加班 的文章
