亚洲欧美日韩国产一区二区精品_亚洲国产精品一区二区动图_级婬片A片手机免费播放_亚洲国产成人Av毛片大全,男女爱爱好爽好疼视频免费,中文日韩AV在线,无码视频免费,欧美在线观看成人高清视频,在线播放免费人成毛片,成 人 网 站 在 线 视 频A片 ,亚洲AV成人精品一区二区三区

機械社區(qū)

 找回密碼
 注冊會員

QQ登錄

只需一步,快速開始

搜索

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

查看數(shù): 8257 | 評論數(shù): 9 | 收藏 5
關(guān)燈 | 提示:支持鍵盤翻頁<-左 右->
    組圖打開中,,請稍候......
發(fā)布時間: 2020-5-5 15:03

正文摘要:

有時候我們統(tǒng)計當(dāng)前文件夾內(nèi)某種文件的文件名,,少的時候當(dāng)然手打就ok,,面對幾百張圖紙的時候這并不是個理智的方法,。8 A8 Y3 D1 b& p4 L2 F& y* [7 S- D- q. t ' m) ?9 w4 n% y- w8 s 所以這個時候就可以祭出【批處 ...

回復(fù)

魍者歸來 發(fā)表于 2021-8-15 10:17:12
妖洞兩拐 發(fā)表于 2021-8-15 10:01% E1 s( B% m1 I2 J! {- G9 {3 p/ S) s
怎么批量在文件名中漢字前后加上括號,?

8 k( \: E" w0 ?+ ?) m: u' L& V2 P9 H! Y: p這個需求很古怪,一般都是要去括號的,�,?梢阅胑xcel中的替換功能當(dāng)橋梁,批量修改文件名,�,;蛘哂虚e暇時間的,可以直接摞代碼搞定,。" i8 f/ {, k4 e7 Z* A% I. t
妖洞兩拐 發(fā)表于 2021-8-15 10:01:45
怎么批量在文件名中漢字前后加上括號,?
蘇州萬坤信息 發(fā)表于 2020-6-11 13:07:55
分享
sf-1224 發(fā)表于 2020-5-7 08:59:27
收藏了,謝謝,!
遠(yuǎn)祥 發(fā)表于 2020-5-6 14:13:20
這是個好主意,!
曉昀 發(fā)表于 2020-5-5 23:04:26
“/B”代表的含義是什么?
007learn 發(fā)表于 2020-5-5 18:20:06
收藏了,,感謝分享,。
shaokuang 發(fā)表于 2020-5-5 16:10:43
轉(zhuǎn)帖" z% m( d; U: [3 T/ |3 ]
批量獲取文件名) p. d4 T+ Q6 w& r6 p: T0 a% e6 c5 @
這里分享工具下載鏈接:$ u, C, Z7 h# n4 d- I) c

% h! U4 h, g( B( g6 i: T* \* Fhttp://pan.baidu.com/s/1o8u6aiY
8 j5 z$ k* v: O' G
9 u% r& G; N1 L' G( E* I7 X& {功能:批量獲取同一個文件夾內(nèi)的文件名,并根據(jù)文件名統(tǒng)計分支機構(gòu)的文檔報送情況,。4 }; E0 f0 n: z+ X
& N6 [- m1 t0 p; w/ w+ y
使用方式:將表格文件放入存放需要統(tǒng)計各種文件的文件夾內(nèi),,打開EXCEL表格,選擇需要統(tǒng)計的文件類型,,點擊按鈕運行宏即可,。
7 ?! S0 |% e, D  a2 p, b  x+ T4 }( m. s. S
注意事項:最好在收集保存文件時,按照報送機構(gòu)關(guān)鍵字重命名文件(可以通過VBA代碼在OUTLOOK中自動存儲郵件的附件并重命名,,這個以后再和大家分享),。
/ P! U/ c6 F5 w* p3 z/ O1 e4 m( w/ R0 j% M1 _. G8 n( [
授人以魚不如授人以漁,這里直接上代碼:
2 D# @( A9 f) t5 |
$ J0 A; e7 G$ H5 s# Z0 `+ hPrivate Sub 提取文件名()0 [& |* B. H4 y* {4 E/ i
( }2 q, b5 m7 L  q' h" v0 i
Dim FileName As String
, A; `" f! w& _" W9 u2 p) W  V: @. F# z. o6 g0 N
Dim i As Long3 k' C: s7 Q2 n

" b1 J3 Y( Q+ s0 c3 DDim tmp As String8 r8 Q* f7 C% `2 U
: `' k% \% B& o$ K1 l( Z, F
mypath = ActiveWorkbook.Path1 M: R+ ?7 y: M( r: Q9 `6 N: T( x

% L& \  V4 O0 |# t8 d, f: ~FileName = Dir(mypath & "\*.*")'如果是僅需要統(tǒng)計特定類型的文件如EXCEL,將*.*改為*.xlsx即可,以此類推
5 C) J! L( F- o# ]9 l- ?! E7 |; D9 J
! f) ~* X& ?. z) ui = 04 d4 x4 s6 n7 |2 v3 b# S7 x, v; B

8 n7 m1 G9 M3 B, m6 ?+ W* [Range("N:N").ClearContents; N; U! U9 x: y1 V
) t  U  E7 Z3 A
Do While FileName > ""
3 K% W1 q; \- F/ e* D: r$ z
# P. K5 {, S+ h9 C) Ui = i + 1( q: q0 X5 [4 B  X1 ^0 L9 _

5 V8 n* h' E6 e3 \& XRange("N" & i) = FileName$ r- B4 F! \! u9 g+ n

1 I% g, z: R! f; O$ DFileName = Dir
5 z+ V& i' v) ?
/ E1 L6 g3 H7 G, {% b- oLoop& a( k" T' u2 e7 \: P
+ a7 J% Y3 \+ E- @) i8 q
End Sub

自動獲取文件夾內(nèi)全部文件的文件名.rar

17.06 KB, 下載次數(shù): 4, 下載積分: 威望 -3 點

評分

參與人數(shù) 2威望 +2 收起 理由
閑人南居 + 1 熱心助人,,專業(yè)精湛!
大白小白 + 1 熱心助人,,專業(yè)精湛!

查看全部評分

小黑屋|手機版|Archiver|機械社區(qū) ( 京ICP備10217105號-1,京ICP證050210號,,浙公網(wǎng)安備33038202004372號 )

GMT+8, 2025-2-11 06:49 , Processed in 0.076188 second(s), 20 queries , Gzip On.

Powered by Discuz! X3.4 Licensed

© 2001-2017 Comsenz Inc.

快速回復(fù) 返回頂部 返回列表