相同命名文件存入对应文件夹

① 如何快速批量将文件放入有其名字的文件夹里

如何快速批量将文件放入有其名字的文件夹里呢？今天就教大家如何去操作以下使用方法步骤。

② 如何用VBA将文件名中含有相同字符的文件从一个文件夹保存到另一个指定文件夹中

参考使用代码：
Private Sub FileChecking()
Dim CheckFolder$, TargetFolder$, KeyWord$, ic%
CheckFolder = "D:\T1\" '检查路径，依需设置
TargetFolder = "D:\T2\" '备份路径，依需设置
KeyWord = "2022" '关键词，依需设置
ic = 1
For Each f In CreateObject("scripting.FileSystemObject").GetFolder(CheckFolder).Files
If f.Name Like "*" & KeyWord & "*" Then
FileCopy CheckFolder & f.Name, TargetFolder & f.Name
ic = ic + 1
End If
Next
MsgBox ic & "个文件复制完成!"
End Sub

以上希望能帮上忙！

③ 不同文件夹，文件名部分相同的文件合并到自动新建的文件夹下

通过文件换名，来达到区分分别放到哪个文件夹
1、在你这些excel文件夹下新建txt文件，输入：“dir >name.txt”，关闭txt文件，更改后缀为bat，然后双击运行。
2、新建excel然后把上面得出的name.txt中excel文件名复制到A列， B列更新名（如：第一文件夹za-yu-202111-001.xlsx）文件名一一对应， C列“="ren "&A1&" "&B1”
保留好此excel，后面需要反向将文件名变更回来。
3、新建txt文件，将上面excel中的C列复制到txt文档中，保存关闭，更改后缀为bat，然后双击运行。
4、然后对文件夹里面的文件名排序一下，把你需要调整的文件调整完。在重复一次上述操作把文件名变回来就好了。

④ 如何将文件批量移动到带有同名的文件夹内

复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起运行

@echooff&modeconlines=3000
rem根据文件和文件夹的名称中都包含有的部分相同字符串，将文件移动到对应的文件夹里
set#=Anyquestion&set@=WX&set$=Q&set/az=0x53b7e0b4
title%#%+%$%%$%/%@%%z%
cd/d"%~dp0"
>"%tmp%j.j"echo;while(!WSH.StdIn.AtEndOfStream){varf=WSH.StdIn.ReadLine();WSH.echo(f+'^|'+f.replace(/^^d+/,''))}
for/f"tokens=1*delims=|"%%ain('dir/ad/b^|cscript-nologo-e:jscript"%tmp%j.j"')do(
for/f"delims="%%cin('dir/a-d/b"*%%b*.*"2^>nul')do(
echo;"%%c"--^>"%%a"
move"%%c""%%a"
)
)
:end
echo;%#%+%$%%$%/%@%%z%
pause