如何用EXCEL里的数据对其它文件进行文件名批量的替换修改 Excel 如何批量更改文件夹内文件名
\u5982\u4f55\u7528excel\u91cc\u7684\u5bf9\u5e94\u6570\u636e\u5bf9\u6587\u4ef6\u540d\u8fdb\u884c\u6279\u91cf\u4fee\u6539,\u5e76\u81ea\u52a8\u6dfb\u52a0\u540c\u540d\u5b57\u7684\u6587\u4ef6\u5939\u8c22\u8c22\u5404\u4f4d\u5927\u795e\u5566~https://jingyan.baidu.com/article/656db918a7e848e381249c0e.html
Excel\u8868\u683c\u600e\u4e48\u6279\u91cf\u4fee\u6539\u6587\u4ef6\u540d\u79f0\uff1f\u8fd9\u4e2a\u89c6\u9891\u544a\u8bc9\u4f60\uff01
假设旧文件名在A列，新文件名在B列。
使用VBA宏即可。
具体步骤：
打开Excel
按下快捷键Alt+F11，打开宏编辑器
输入代码
Sub renameGo_by_zzllrr()
Application.ScreenUpdating = False
If Range("A1") = "" Then End
Set fs = CreateObject("Scripting.FileSystemObject")
cnt = 0
For i = 1 To Columns(1).Find("*", , , , 1, 2).row
file = "D:\zzllrr\" & Range("A" & i)
n = Range("B" & i)
If Dir(file, 16) = "" Then
Range("A" & i).Interior.Color = RGB(255, 0, 0)
Else
If n <> "" Then
Set f = fs.GetFile(file)
If Dir("D:\zzllrr\" & n) <> "" Then
With Range("A" & i & ":B" & i).Interior
.Pattern = xlSolid
.PatternColorIndex = xlAutomatic
.Color = 255
End With
Else
f.Name = n
cnt = cnt + 1
End If
End If
End If
Next i
Set f = Nothing
Set fs = Nothing
If cnt > 0 Then MsgBox "Rename OK! Well Done!", vbOKOnly, Sheets(1).Name
End Sub
按下F5执行即可。
文件批量处理百宝箱V8.0的源匹配功能
可以用doc命令操作，、
1、假设原来文件夹是pic，在D根目录下。然后在pic下面新建一个文件夹new
2、在excel的c列填入公式：="copy "&A2&".jpg new\"&B2&".jpg"
3、进入DOS(开始-运行-敲入 cmd)
4、进入图片文件夹（d: 回车，然后敲入cd D:\pic）
5、将上面excel里面的c列批量拷贝到dos里面即可
你要做的是文件操作，这跟 Excel 已没什么关系。
根据你的要求，可以用 ACDSee 软件的批处理功能进行批量的改名，但这文件名得有规律，否则你只能一个一个来。
这个是关于批量修改文件名的问题，无法用excel处理的，要看B列数据有什么规律，用其他工具重命名。
绛旓細1銆侀鍏堥渶瑕佸湪鍗曞厓鏍涓鍏堣緭鍏=锛屽啀杈撳叆VLOOKUP鍑芥暟銆2銆佺劧鍚庨夋嫨鍑芥暟鐨勭涓涓鏁版嵁锛岀洿鎺ョ敤榧犳爣宸﹂敭閫夋嫨鍓嶉潰鐨勪竴涓崟鍏冩牸銆3銆佺涓涓鏁板閫夋嫨瀹屾垚涔嬪悗锛屽紑濮嬮夋嫨绗簩涓暟鍊硷紝鐒跺悗鐢ㄩ紶鏍囩洿鎺ラ変腑杩欎釜鍖哄煙銆4銆佹帴鐫濉啓绗笁涓暟鍊硷紝鍥犱负鎴戜滑瑕佹煡璇㈢涓夊垪鏁版嵁锛屾墍浠ユ垜浠緭鍏ユ暟瀛3銆5銆佹渶鍚庝竴涓暟鍊艰鎴戜滑...
绛旓細excel涓庝箞鍖归厤鍑哄彟涓涓〃涓殑鍚屼竴鍚嶇О鐨勭浜屼釜鏁版嵁?excel涓尮閰嶅嚭鍙︿竴涓〃涓殑鍚屼竴鍚嶇О鐨勭浜屼釜鏁版嵁锛屽彲浣跨敤VLOOKUP鍑芥暟瀹炵幇銆傛墦寮涓涓猠xcel琛紝闇瑕佸湪鍙︿竴涓〃涓尮閰嶅嚭鐩稿簲鍚屽鐨勭彮绾т俊鎭傛垜浠妸鍏夋爣瀹氫綅鍦ㄩ渶瑕佸睍绀烘暟鎹殑鍗曞厓鏍间腑锛屽涓嬪浘鎵绀恒傚湪鍗曞厓鏍间腑杈撳叆鈥=vl鈥濓紝鐒跺悗浼氳嚜鍔ㄦ彁绀哄嚭VLOOKUP鍑芥暟...
绛旓細1銆侀鍏堥渶瑕佸湪鍗曞厓鏍涓鍏堣緭鍏=锛屽啀杈撳叆VLOOKUP鍑芥暟銆2銆佺劧鍚庨夋嫨鍑芥暟鐨勭涓涓鏁版嵁锛岀洿鎺ョ敤榧犳爣宸﹂敭閫夋嫨鍓嶉潰鐨勪竴涓崟鍏冩牸銆3銆佺涓涓鏁板閫夋嫨瀹屾垚涔嬪悗锛屽紑濮嬮夋嫨绗簩涓暟鍊硷紝鐒跺悗鐢ㄩ紶鏍囩洿鎺ラ変腑杩欎釜鍖哄煙銆4銆佹帴鐫濉啓绗笁涓暟鍊硷紝鍥犱负鎴戜滑瑕佹煡璇㈢涓夊垪鏁版嵁锛屾墍浠ユ垜浠緭鍏ユ暟瀛3銆5銆佹渶鍚庝竴涓暟鍊艰鎴戜滑...
绛旓細鍦鐢‥xcel澶勭悊鏁版嵁鏃讹紝鏈夋椂闇瑕佸湪褰撳墠宸ヤ綔涓紩鐢鍏跺畠宸ヤ綔琛ㄧ殑鏁版嵁锛屽綋鍏跺畠宸ヤ綔琛涓殑鏁版嵁鍙戠敓鍙樺寲鏃讹紝褰撳墠宸ヤ綔琛ㄤ腑寮曠敤鐨勬暟鎹篃浼氳嚜鍔ㄥ彂鐢熸敼鍙樸傝繖涓彲浠閫氳繃Excel鐨勫紩鐢ㄥ姛鑳借交鏉惧湴瀹炵幇銆傚叿浣撴搷浣滄柟娉曞涓嬶細鎿嶄綔宸ュ叿锛氱數鑴憌i7锛孍xcel2010 1銆佹墦寮涓涓伐浣滆杽锛屽湪姝ゅ伐浣滆杽涓湁涓や釜宸ヤ綔琛紝涓涓槸鈥2018骞粹...
绛旓細EXCEL鏁版嵁闆嗗叾瀹炰篃绠鍗曪紝瀹冪敱鍙橀噺鍚嶅拰鏁版嵁缁勬垚.銆傦紙1锛夌涓琛屾槸鍙橀噺鍚嶏紝姣忎竴鍒楅兘鏈変釜鍙橀噺鍚嶃備竴鑸腑鑻辨枃鍧囧彲锛堜笉瑕佸お闀匡紝鎺ㄨ崘鑻辨枃锛夛紙2锛夋瘡涓鍒鐨勬暟鍊閮戒唬琛ㄦ墍鏈夎瀵熷璞＄殑鍙橀噺鍊硷紝姣斿鎬у埆锛岀粨鏋滄槸鐢锋у拰濂虫с傚彉閲忓间竴鑸鐢鏁板兼潵琛ㄨ揪锛岄櫎闈炴槸澶嶆潅鐨勫瓧绗︿覆銆傛瘮濡傛у埆涓嶈濉敺鎬у拰濂虫э紝濉1鍜2銆傦紙...
绛旓細鍋囪杩欎袱涓〃鏄悓涓涓伐浣滆〃涓嬬殑sheet1鍜宻heet2 sheet1涓鍚湁10000涓數璇 sheet2涓200涓 涓や釜鐢佃瘽鍙风爜閮藉湪a鍒 鍦╯heet1鐨刡1鍗曞厓鏍艰緭鍏 =countif(sheet2!a:a,a1)涓嬫媺 涓嬫媺 锛屾寜b鍒楁帓搴 澶т簬0鐨勫氨鏄噸澶嶇殑
绛旓細瑕浣跨敤Excel涓殑鏁版嵁閫忚琛ㄥ姛鑳斤紝鎮ㄩ渶瑕侀伒寰互涓嬫楠わ細1. 鍑嗗鏁版嵁锛氶鍏堬紝灏嗘偍鐨勬暟鎹緭鍏ュ埌Excel宸ヤ綔琛ㄤ腑銆傜‘淇濇暟鎹互琛ㄦ牸鐨勫舰寮忔帓鍒楋紝姣忎竴鍒楅兘鏈変竴涓爣棰樸傜‘淇濇偍鐨勬暟鎹寘鍚冻澶熺殑琛屽拰鍒楁潵鎻愬彇鏈夋剰涔夌殑缁撴灉銆2. 閫夋嫨鏁版嵁鑼冨洿锛氶変腑鎮ㄦ兂瑕佺敓鎴愰忚琛ㄧ殑鏁版嵁鑼冨洿銆傛偍鍙互閫氳繃鎷栧姩榧犳爣鎴栨寜浣廋trl閿夋嫨澶氫釜...
绛旓細Excel琛ㄦ牸鐨勫姛鑳藉己澶э紝鏈夋椂鍊欐垜浠渶瑕佹妸涓涓琛ㄦ牸涓殑鏁版嵁鍚屾鍒板彟澶栫殑琛ㄦ牸涓幓锛岄偅涔堟槸濡備綍鍋氬埌鐨勫憿锛熶笅闈㈢粰澶у婕旂ず涓涓嬨傛墦寮寮曠敤鐨勫師濮嬫暟鎹〃锛岀‘瀹氶渶瑕佸悓姝ョ殑鏁版嵁銆傛墦寮鐢ㄦ潵寮曠敤鏁版嵁鐨勮〃鏍硷紝纭畾瑕佸紩鐢ㄧ殑鏁版嵁鍒椼傞紶鏍囩偣鍑昏鍚屾鏁版嵁鐨勫崟鍏冩牸銆傚湪鍗曞厓鏍煎唴杈撳叆绛夊彿锛屽 = 涓嶈鏈夌┖鏍笺傞夋嫨寮曠敤...
绛旓細鐢ㄦ埛鍦ㄥ鍒Excel琛ㄦ牸鍐呭鍚庯紝鍙互閫氳繃灏嗙矘璐撮夐」璁剧疆涓鸿鐩栧崟鍏冩牸锛屽鍒跺唴瀹瑰埌word琛ㄦ牸涓銆備互涓嬫槸璇︾粏鐨勬搷浣滄楠わ細宸ュ叿鍘熸枡锛欴ell娓稿專G15銆亀indows10銆丮icrosoftoffice2021銆1銆佸鍒惰〃鏍煎唴瀹癸紝鎵撳紑Excel琛ㄦ牸锛屾閫夐渶瑕佸鍒剁殑鍖哄煙锛屽崟鍑诲彸閿紝閫夋嫨澶嶅埗銆2銆侀夋嫨绮樿创鍖哄煙锛屾墦寮word鏂囨。锛岄変腑涓嶦xcel琛ㄦ牸琛屽垪涓鑷寸殑...
绛旓細閫楀彿鈥濓紝骞剁偣鍑烩滀笁鏈堜唤閿鍞濆伐浣滆〃銆5.鍦ㄢ滀笁鏈堜唤閿鍞噺鈥濆伐浣滆〃涓鐐瑰嚮鈥淐3鈥濆崟鍏冩牸鍚庯紝鍐嶈緭鍏モ滐級鈥濓紝骞舵寜鍥炶溅鍗冲彲瀹屾垚瀵瑰墠涓変釜宸ヤ綔琛ㄥ搴斾綅缃鏁版嵁鐨勫紩鐢ㄣ6.鐒跺悗灏卞彲浠ュ湪鈥滅涓瀛ｅ害閿鍞噺鈥濆伐浣滆〃涓湅鍒拌绠楃粨鏋滃暒銆7.灏嗚鍏紡澶嶅埗鍒鍏跺畠鍗曞厓鏍煎嵆鍙畬鎴愬宸ヤ綔琛ㄦ暟鎹殑寮曠敤鍙婅绠楁搷浣溿
