能否用excel表取出文件名

① 鐢佃剳鏂囦歡澶逛腑鎬庝箞蹇閫熸壘鍒癊xcel鏂囨。鐨勬枃浠跺悕

鏈夌殑灝忎紮浼村湪浣跨敤鐢佃剳榪囩▼涓錛屾兂瑕佸湪鏌愪竴涓鏂囦歡澶逛腑蹇閫熸壘鍒癊xcel鏂囨。鐨勬枃浠跺悕錛屼絾鏄鍗翠笉鐭ラ亾濡備綍鎿嶄綔錛岄偅涔堝皬緙栧氨鏉ヤ負澶у朵粙緇嶄竴涓嬪惂銆
鍏蜂綋濡備笅錛
1.絎涓姝ワ紝鍙屽嚮鎴栬呭彸鍑繪墦寮闇瑕佹壘鏂囨。鐨勬枃浠跺す銆

2.絎浜屾ワ紝鏉ュ埌涓嬪浘鎵紺虹殑鏂囦歡澶歸〉闈㈠悗錛屽皢璇ユ枃妗ｅ瓨鍌ㄧ殑璺寰勫嶅埗銆

3.絎涓夋ワ紝鍙屽嚮鎴栬呭彸鍑繪墦寮涓涓絀虹櫧Excel琛ㄦ牸錛屾帴鐫鐐瑰嚮欏甸潰欏墮儴鐨勫叕寮忛夐」錛岀劧鍚庣偣鍑誨畾涔夊悕縐板彸杈圭殑涓嬫媺綆澶淬

4.絎鍥涙ワ紝鎴戜滑鍙浠ョ湅鍒板備笅鍥炬墍紺虹殑緙栬緫鍚嶇О欏甸潰錛岃緭鍏ュ悕縐頒負琛ㄦ牸鏂囦歡錛屾垨鑰呰嚜瀹氫箟鎯寵佽劇疆鐨勫悕縐幫紝闇瑕佽頒綇璁劇疆鐨勫悕縐幫紝鐐瑰嚮寮曠敤浣嶇疆鍙寵竟鐨勮緭鍏ユ嗭紝鎺ョ潃綺樿創鍒氬垰澶嶅埗鐨勬枃妗ｅ瓨鍌ㄨ礬寰勶紝鐒跺悗鐐瑰嚮鍙充笅瑙掔殑紜瀹氶夐」銆

5.絎浜旀ワ紝鏉ュ埌涓嬪浘鎵紺虹殑欏甸潰鍚庯紝鍙浠ョ湅鍒扮孩妗嗕腑鐨勬枃浠舵彁鍙栧叕寮忋

6.絎鍏姝ワ紝鎸夐敭鐩樹笂絎涓涓鐨勫洖杞﹂敭錛屽氨鍙浠ユ垚鍔熸壘鍒拌〃鏍肩被鍨嬫枃妗ｇ殑鏂囦歡鍚嶃

7.絎涓冩ワ紝鎷栧姩濉鍏呴敭寰涓嬶紝鐩村埌鐪嬪埌鎶ラ敊鐨勬彁紺轟俊鎮錛屽氨鍙浠ユ垚鍔熷揩閫熸壘鍒癊xcel鏂囨。鐨勬枃浠跺悕浜嗐

② Excel 如何取得文件的文件名

1.如果是要獲得工作簿的文件名可以用以下函數公式
=MID(CELL("filename"),FIND("[",CELL("filename"))+1,FIND("]",CELL("filename"))-FIND("[",CELL("filename"))-1)
2.如果是想獲得工作簿中工作表名可以用以下函數公式
=MID(CELL("filename"),FIND("]",CELL("filename"))+1,99)
或者=REPLACE(CELL("filename"),1,FIND("]",CELL("filename")),"")
用vba的方式也可以達到這個目的
1.獲取當前工作簿名寫在單元格A1中
Sub wbname()
Cells(1, 1) = ThisWorkbook.Name

End Sub
2.獲取當前工作簿所有工作表名，寫入A列
Sub wsname()
Dim sht As Worksheet, i%

For Each sht In Worksheets

i = i + 1

Cells(i, 1) = sht.Name

Next

End Sub

③ Excel批量處理文件，提取文件名

• 比如，這里如果想要把「7.21」這個文件夾裡面的文件，要做個整理，把文件名稱都匯總在一個excel表格了，常見的就是一個一個復制文件名稱，然後新建excel表格，但這樣效率很慢。