中国DOS联盟

在一个文本中 需要循环替换A1,B1一直到A20，B20.
例如原文本：

Range("A1").Value = "TEST"  Or Range("A1").Value = "TEST2" 

Range("B1").Value = "TEST3"

如：

Range("A1").Value = "TEST" Or Range("A1").Value = "TEST2" 

Range("B1").Value = "TEST3"



Range("A2").Value = "TEST" Or Range("A2").Value = "TEST2" 

Range("B2").Value = "TEST3"

..........

没太明白你的意思，不知道是不是这样：

@echo off&setlocal enabledelayedexpansion

for /l %%i in (1 1 20) do for /f "delims=" %%a in (test.txt) do (set P=%%a

set P=!P:A1=A%%i!

set P=!P:B1=B%%i!

echo !P!&echo.)>>test-.txt

for /L %%a in (1,1,20) do (
echo Range("A%%a").Value = "TEST" Or Range("A%%a").Value = "TEST2" >>sybn.txt
echo Range("B%%a").Value = "TEST3" >>sybn.txt
)

[ Last edited by sl543001 on 2010-3-1 at 20:50 ]

感谢楼上，不过代码不执行。
再次感谢Hanyeguxing，脚本很好用。学习了。
再请教一下

   Range("A2").Value = Range("A1").Value

如果这样递增，如何做呢。

[ Last edited by superdoor on 2010-3-1 at 17:47 ]

for %%a in (1,1,20) do (
echo Range("A%%a").Value = "TEST" Or Range("A%%a").Value = "TEST2" >>sybn.txt
echo Range("B%%a").Value = "TEST3" >>sybn.txt
)
输出的括号前要加转意符
使用set /a运算