EXCEl索引是什么意思(excel索引)
哈嘍,大家好~~~我是小編田甜,關(guān)于EXCEl索引是什么意思,excel索引這個(gè)很多人還不知道,那么現(xiàn)在讓田甜帶著大家一起來看看吧!
1、先可新建一個(gè)工作表《索引》。
2、插入名稱-定義。
3、運(yùn)用transpose(get,wordbook(1)提取足夠多的工作表名再用超鏈接公式鏈接用宏就比較簡(jiǎn)單了 我給你個(gè)宏的例子根據(jù)你表格的情況 還要做部分修改Sub mulu()On Error GoTo TuichuDim i As IntegerDim ShtCount As IntegerDim SelectionCell As RangeShtCount = Worksheets.CountIf ShtCount = 0 Or ShtCount = 1 Then Exit SubApplication.ScreenUpdating = FalseFor i = 1 To ShtCountIf Sheets(i).Name = "目錄" ThenSheets("目錄").Move Before:=Sheets(1)End IfNext iIf Sheets(1).Name <> "目錄" ThenShtCount = ShtCount + 1Sheets(1).SelectSheets.AddSheets(1).Name = "目錄"End IfSheets("目錄").SelectColumns("B:B").Delete Shift:=xlToLeftApplication.StatusBar = "正在生成目錄…………請(qǐng)等待!"For i = 2 To ShtCountActiveSheet.Hyperlinks.Add Anchor:=Worksheets("目錄").Cells(i, 2), Address:="", SubAddress:= _Sheets(i).Name & "!R1C1", TextToDisplay:=Sheets(i).NameNextSheets("目錄").SelectColumns("B:B").AutoFitCells(1, 2) = "目錄"Set SelectionCell = Worksheets("目錄").Range("B1")With SelectionCell.HorizontalAlignment = xlDistributed.VerticalAlignment = xlCenter.AddIndent = True.Font.Bold = True.Interior.ColorIndex = 34End WithApplication.StatusBar = FalseApplication.ScreenUpdating = TrueTuichu:End Sub。
本文分享完畢,希望對(duì)大家有所幫助哦。
免責(zé)聲明:本文為轉(zhuǎn)載,非本網(wǎng)原創(chuàng)內(nèi)容,不代表本網(wǎng)觀點(diǎn)。其原創(chuàng)性以及文中陳述文字和內(nèi)容未經(jīng)本站證實(shí),對(duì)本文以及其中全部或者部分內(nèi)容、文字的真實(shí)性、完整性、及時(shí)性本站不作任何保證或承諾,請(qǐng)讀者僅作參考,并請(qǐng)自行核實(shí)相關(guān)內(nèi)容。
- 震驚!LCK 新晉天才新人登場(chǎng),對(duì)
- 明日之后新年之際,新房等待入住
- 暗區(qū)突圍 7 級(jí)頭及暗區(qū)突圍四大
- 鳴潮中菲比的突破材料如何獲?。?/a>
- 當(dāng)前 dnf 中哪個(gè)職業(yè)更易混團(tuán)?
- 原神:一款充滿樂趣與挑戰(zhàn)的手游
- 暗區(qū)突圍人機(jī)對(duì)戰(zhàn)模式:暗區(qū)突圍
- dnf 不同起源強(qiáng)化卷性價(jià)比對(duì)比
- 神谷英樹:他所打造的所有游戲皆
- DNF 締造者適合用哪款傳說裝備?
- 特朗普曾下令對(duì)‘伊斯蘭國’成員
- 魔獸世界 WLK 情人節(jié)掉落 245B