77七

回复 6# 单车少男


   应该不影响，不行把失败的docx文件名发出来看看

77七

回复 5# 单车少男


  

for /f "tokens=1-4 delims=#=" %%a in ('set # ^|sort /r') do (
	if not defined _"%%~a" (
		copy "%%~c" "%%d"
		"%%d"
		timeout 2 >nul
		set _"%%~a"=1
	)
)
复制代码

单车少男

回复 4# 77七


    后缀xlsx，换成docx 无法用吗

单车少男

回复 4# 77七


    REN 改成 copy  可以了

新增后，打开呢，怎么搞

77七

回复 3# 单车少男

@echo off
cd /d "%~dp0"
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /a-d "* - *v*.*"^|find /v "%~nx0"') do (
	for /f "tokens=1-3 delims=v- " %%a in ("%%~ni") do (
		set /a n=%%c+1000000,m=%%c+1
		set #"%%b"#"!n!"#"%%i"=%%a - %%bv!m!%%~xi
	)
)
for /f "tokens=1-4 delims=#=" %%a in ('set # ^|sort /r') do (
	if not defined _"%%~a" (
		ren "%%~c" "%%d"
		set _"%%~a"=1
	)
)
endlocal
pause
复制代码

单车少男

回复 2# 77七


    不好意思，我的问题，没表达清楚，已经修改

77七

请多提供几个文件名
比如按规律填空
1 （？）
这怎么填