中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 求助，循环替换，递增的字符

superdoor
新手上路

积分 10
发帖 6
注册 2007-10-19
状态离线

『楼主』: 求助，循环替换，递增的字符

在一个文本中需要循环替换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"

..........

2010-3-1 14:16

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 2 楼』:

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

@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

批处理之家 http://bbs.bathome.net/forum-5-1.html

2010-3-1 14:54

sl543001
中级用户

积分 499
发帖 225
注册 2008-12-30
状态离线

『第 3 楼』:

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 ]

SYBNQQ:354324773

2010-3-1 14:59

(354324773)

superdoor
新手上路

积分 10
发帖 6
注册 2007-10-19
状态离线

『第 4 楼』:

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

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

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

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

2010-3-1 15:20

Hanyeguxing
银牌会员

正在学习中的菜鸟...

积分 1039
发帖 897
注册 2009-3-1
来自在地狱中仰望天堂
状态离线

『第 5 楼』:

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运算

批处理之家 http://bbs.bathome.net/forum-5-1.html

2010-3-1 19:00

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: