現在才找到...
http://www.access-cn.com/dvbbs/dispbbs.asp?BoardID=108&replyID=53486&id=50994
插入-名稱 - 定義 A
=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),)&T(NOW())
=INDEX(A,N) N為你想要的工作表，如第一張 N就為1 第2張 N為2 ......
----------
http://www.access-cn.com/Article/Class42/Class44/200610/2688.html
GET.DOCUMENT(87)能告訴你工作表的位置序號
----------
如果要參照的話，活頁簿名稱可以留著，因此不用REPLACE
就更簡單了
對嘛~ VBA取出名稱這麼容易
前身一定也可以辦到才有道理
結論
定義 =INDEX(GET.WORKBOOK(1),GET.DOCUMENT(87)-1)&T(NOW())
T(NOW())是為了讓定義自動更新
複習
2027 2 3/13 icene R: [問題]MS EXCEL 不同Sheet計算
Function SHTNAME(ByVal RNG As Range)
SHTNAME = Sheets(RNG.Worksheet.Index - 1).Name
End Function
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.164.51.246
※ 編輯: JieJuen 來自: 122.123.42.107 (12/05 03:45)