【魍生技】快速統(tǒng)計(jì)文件名

魍者歸來

有時(shí)候我們統(tǒng)計(jì)當(dāng)前文件夾內(nèi)某種文件的文件名，少的時(shí)候當(dāng)然手打就ok,，面對幾百張圖紙的時(shí)候這并不是個(gè)理智的方法,。
2 G& x) k) o5 U
所以這個(gè)時(shí)候就可以祭出【批處理】了：

1、新建一個(gè).txt文件。
2,、打開,，輸入以下紅字內(nèi)容（這里以統(tǒng)計(jì).PDF文件為例）：
/ s0 Q* j$ G7 R) m* m" `4 VDIR  *.pdf /B  >LIST.TXT

6 [, j+ r! ?  h) u/ p% G3 I: c3、保存文件,，將.txt后綴改為.bat,。
1 _; }% y! k7 \& W4、雙擊運(yùn)行,，會在當(dāng)前文件夾生成一個(gè)LIST.TXT文件,，打開可以看到里面的內(nèi)容就是當(dāng)前文件夾下全部PDF文件清單。

特別的說明：

• 上述紅色字體的部分可以直接復(fù)制黏貼,，所有字符（包括空格）均為英文半角,。
• .pdf可以替換成自己需要的后綴名，比如統(tǒng)計(jì)圖紙的時(shí)候可以改成.dwg等,。
• LIST.TXT是用來存儲清單的文本文檔,，其中LIST可以替換成自己習(xí)慣的名字，但不要用中文,，會出現(xiàn)亂碼,。
• 保存好的.bat文件復(fù)制到任何有權(quán)限的文件夾都可以使用。（注意：不會統(tǒng)計(jì)子文件夾中的文件）
  % z: M6 I3 v% G4 ~( N0 y7 ^5 }

  J# b7 A; n, @4 x* p
% x0 j' C$ K0 b: \3 s

shaokuang

轉(zhuǎn)帖
, |4 d& D5 n( G5 i1 O批量獲取文件名
這里分享工具下載鏈接：
; }. E) O. C* y
http://pan.baidu.com/s/1o8u6aiY
' @( P6 @' b2 H0 @9 \1 X
功能：批量獲取同一個(gè)文件夾內(nèi)的文件名,，并根據(jù)文件名統(tǒng)計(jì)分支機(jī)構(gòu)的文檔報(bào)送情況,。
- A) l, F& j; n1 H6 F
  W+ n1 W3 Y* ]: `使用方式：將表格文件放入存放需要統(tǒng)計(jì)各種文件的文件夾內(nèi)，打開EXCEL表格,，選擇需要統(tǒng)計(jì)的文件類型,，點(diǎn)擊按鈕運(yùn)行宏即可。
% ]) U2 J( k. Z
注意事項(xiàng)：最好在收集保存文件時(shí),，按照報(bào)送機(jī)構(gòu)關(guān)鍵字重命名文件（可以通過VBA代碼在OUTLOOK中自動(dòng)存儲郵件的附件并重命名,，這個(gè)以后再和大家分享）。

. K; i+ p, \5 Q2 V4 y% `授人以魚不如授人以漁,，這里直接上代碼：

& u6 u- Q( G/ W* PPrivate Sub 提取文件名()
6 {+ b2 @/ d1 ^" V4 N! U
Dim FileName As String
3 p  h5 P! `* K& u
4 M* h7 Q" r% }. G3 V3 f/ l4 eDim i As Long
. Q( M* Q9 `! v
/ D) e8 u5 e/ G7 m1 q4 M7 t5 YDim tmp As String

mypath = ActiveWorkbook.Path
# N( D4 l$ w+ E& {/ h3 D& J) e
+ J" k1 \; ?: O9 rFileName = Dir(mypath & "\*.*")'如果是僅需要統(tǒng)計(jì)特定類型的文件如EXCEL,將*.*改為*.xlsx即可,以此類推

i = 0

Range("N:N").ClearContents
& C* o" r! _) l
5 S' q$ q6 [9 Z  NDo While FileName > ""
% _- x: k0 g- K
i = i + 1
: N$ Z: }+ k  Q  o, o% J
Range("N" & i) = FileName
3 R! e' y1 W- D3 b, c
( ~( l2 j0 r2 B: Z9 BFileName = Dir

Loop

1 k' m. B( X" W$ a8 |  I$ VEnd Sub

007learn

收藏了,，感謝分享。

曉昀

“/B”代表的含義是什么,？

遠(yuǎn)祥

這是個(gè)好主意,！

魍者歸來

曉昀 發(fā)表于 2020-5-5 23:04
/ y# j; [$ z4 a' g& I“/B”代表的含義是什么？

上圖是命令行中的提示信息，/B相當(dāng)于輸出簡化的格式（也就是文件名或文件夾名）
! X. Z3 C, l  ~% m3 F) S' c# D

( E- @, y: d: C上圖是兩個(gè)命令的對比：①用了dir /b,，輸出的是所在文件夾包含的子文件夾名和文件名,；②用了dir，輸出的是驅(qū)動(dòng)器和文件（夾）的信息,。
4 A* H* Q7 i- S/ [+ @

sf-1224

收藏了,，謝謝！

蘇州萬坤信息

分享

妖洞兩拐

怎么批量在文件名中漢字前后加上括號,？

魍者歸來

妖洞兩拐 發(fā)表于 2021-8-15 10:01
怎么批量在文件名中漢字前后加上括號,？

這個(gè)需求很古怪，一般都是要去括號的,�,？梢阅胑xcel中的替換功能當(dāng)橋梁，批量修改文件名,�,；蛘哂虚e暇時(shí)間的，可以直接摞代碼搞定,。
% a  W( h* F. U0 d4 J' \6 a