寵物集市-寵物集市華東、華南、華北排行榜一覽表
1283
2025-03-31
本文目錄一覽:
解決如何獲取excel所有sheet的名稱的步驟如下:
1.想要獲取Excel中所有sheet頁名稱做成目錄,首先“插入”一個sheet頁做為目錄頁,并在A1和B1填寫“獲取名稱”和“列表目錄”。
2.點(diǎn)擊菜單欄“公式”后,單擊“定義名稱”。名稱中填寫標(biāo)識,引用位置填寫“=get.wortbook(1)”后,點(diǎn)擊“確定”,完成組合定義。
3.單擊A2單元格,輸入"=index(標(biāo)識,row(a2))"回車;鼠標(biāo)左鍵點(diǎn)擊a2單元格右下角,鼠標(biāo)變成“+”號后往下拖動鼠標(biāo)即可將所有sheet頁名稱填充到列表中,完成sheet名稱獲取。
4.獲取的列表名稱是帶有文件名稱的,需要將文件名稱去掉。單擊B2單元格,輸入“=right(a2,len(a2)-find("xlsx.]",a2,1)-4)”獲取最終的列表目錄。選中此列所有名稱,按“ctrl+c”復(fù)制后,右鍵選擇“值粘貼”完成列表。?
這樣就解決了如何獲取excel所有sheet的名稱的問題了。
1、電腦打開Excel表格。
2、按Alt+F11進(jìn)入VBA。
3、進(jìn)入VBA后,點(diǎn)擊插入模塊。
4、點(diǎn)擊插入模塊后,輸入代碼
sub m
for each sh in sheets
k=k+1
cells(k,1)=sh.name
next
end sub
然后點(diǎn)擊運(yùn)行。
5、點(diǎn)擊運(yùn)行后,所有sheet名稱就都提取出來了。
Sub?取得所有工作表的名字()
????For?i?=?1?To?Sheets.Count
????????'寫到當(dāng)前表的第1列
????????Cells(i,?1).Value?=?Sheets(i).Name
????Next
End?Sub
如下圖,假定我們要將Sheet名稱"北京"、"上海"、"廣州"、"深圳"提取出來,放置在Sheet名稱為"提取名稱"的Sheet中。
請點(diǎn)擊輸入圖片描述
點(diǎn)擊左上角的"文件"選項(xiàng)卡。
請點(diǎn)擊輸入圖片描述
將普通的Excel文件(文件后綴為.xlsx或xls)另存為啟用宏的Excel文件(文件后綴為.xlsm)。
請點(diǎn)擊輸入圖片描述
打開另存為的啟用宏的Excel文件,點(diǎn)擊"公式"菜單下的"定義名稱"。
請點(diǎn)擊輸入圖片描述
我們定義名稱為"提取名稱"(名稱可以隨便寫一個)。
引用位置輸入:=GET.WORKBOOK(1)
點(diǎn)擊"確定"。
請點(diǎn)擊輸入圖片描述
在"提取名稱"Sheet中的任意一個單元格輸入函數(shù)公式。
=INDEX(提取名稱
這時,定義好的名稱會在下方顯示出來,我們鼠標(biāo)雙擊彈出的名稱選取該名稱。
請點(diǎn)擊輸入圖片描述
函數(shù)公式輸入完整。
=INDEX(提取名稱,ROW(A1))
請點(diǎn)擊輸入圖片描述
向下填充公式,即可提取所有工作表Sheet的名稱。
這時,我們提取的名稱前面是包含工作薄本身的名稱的。
請點(diǎn)擊輸入圖片描述
使用函數(shù)公式,去除工作薄本身的名稱。
請點(diǎn)擊輸入圖片描述
10
再次向下填充公式,實(shí)現(xiàn)我們想要的效果。
請點(diǎn)擊輸入圖片描述
版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。
版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時內(nèi)刪除侵權(quán)內(nèi)容。