谁会写宏啊 帮我改一个宏

来源：蜘蛛抓取(WebSpider) 时间：2017-05-08 02:44 标签： 剑网三丐帮pve宏
查看: 5863|回复: 8
求高手帮忙写一个批量查找替换的宏
&&知道这种拿来主义确实不好，可是小弟用得急，希望大大们好心帮帮帮忙。
&&需求是这样子的。
& &excel里有一些内容（其实就是文本内容），&&现在需要查找出里面的为 &a& 字段 全部 换成 “x”,&&内容为 “b” 的全部换成“y”&&里面为 “c”的全部换成 “z”.&&等等。
&&有劳各位高手了。
这个&&你直接用替换 不就得了
Sub test()
& & Cells.Select
& & Selection.Replace What:=&a&, Replacement:=&x&, LookAt:=xlPart, _
& && &&&SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
& && &&&ReplaceFormat:=False
& & Selection.Replace What:=&b&, Replacement:=&y&, LookAt:=xlPart, _
& && &&&SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
& && &&&ReplaceFormat:=False
& & Selection.Replace What:=&c&, Replacement:=&z&, LookAt:=xlPart, _
& && &&&SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
& && &&&ReplaceFormat:=False
<font color="# 发表于
这个&&你直接用替换 不就得了
谢谢管理员的回答，因为我有很多单独的需要替换的文本，而且每个单独的文本里要替换的东西比较多，所以用替换是比较费时的，我就想写一个宏，然后我就想把所有的情况全部写到代码里去 然后对每个单独的文本内容操作一下就会方便很多。
做成函数吧，不同的值改参数就成了。
hwc2ycy 发表于
做成函数吧，不同的值改参数就成了。
管理员你好，再问下，
Cells.Replace &都江堰&, &&A style=&COLOR: blue& title=都江堰 href=&#& target=_blank&都江堰&/A&&& &
这里报错& &“vb 编译错误 缺少语句结束”& &好像是转意符的错误， 请问怎么弄呢？
代码不完整。
插代码这样操作。
QQ截图22.jpg (6.04 KB, 下载次数: 10)
12:26 上传
点图中红色的&&，再对话框中粘贴代码。
hwc2ycy 发表于
代码不完整。
插代码这样操作。
谢谢你，已经解决
<font color="# 发表于
Sub test()
& & Cells.Select
& & Selection.Replace What:=&a&, Replacement:=&x&, LookAt:=xlPart, _
如果要匹配单元格，怎么添加语句？
Powered by后使用快捷导航没有帐号？
查看: 3719|回复: 217
新人欢迎积分0 阅读权限30积分111精华0UID帖子金钱353 威望0
Lv.3, 积分 111, 距离下一级还需 139 积分
UID帖子威望0 多玩草0 草
我写不来超级宏，求大神把我这个普通宏改写成超级宏，先谢谢了。
要求：1、添加自动扶摇开关，战斗中打开开关可自动补扶摇。
& && && & 2、添加自动后跳开关，战斗中打开开关ZB与DMG2个BOSS可自动后跳。
& && && & 3、添加棒打狗头开关，1打断，2自动输出(没有其它超级宏那种距离检测，只要为输出模式就自动打怪，跟现在的普通宏一样的输出)。
& && && &4、添加特效腰坠开关，打开开关只在喝完酒的时候开，关掉后手动使用腰坠。
& && && &5、添加特效武器开关，特效武器的名字如果不想写，可以用XXX代替，我自己更改。
& && &&&6、以上5点相应的宏内容请帮忙写一下，我实在不会，谢谢！！！
下面是 我的普通宏。
谢谢！！！
游客，如果您要查看本帖隐藏内容请
本帖最后由 点纯 于
13:10 编辑
新人欢迎积分0 阅读权限30积分111精华0UID帖子金钱353 威望0
Lv.3, 积分 111, 距离下一级还需 139 积分
UID帖子威望0 多玩草0 草
忘记还有个笑醉狂了，请帮忙一起添加一下。
怎么没有人帮我啊。。
新人欢迎积分0 阅读权限20积分17精华0UID帖子金钱58 威望0
Lv.2, 积分 17, 距离下一级还需 33 积分
UID帖子威望0 多玩草0 草
拨狗朝天,横打双獒
新人欢迎积分0 阅读权限30积分66精华0UID帖子金钱91 威望0
Lv.3, 积分 66, 距离下一级还需 184 积分
UID帖子威望0 多玩草0 草
楼主可以发奇穴吗？
新人欢迎积分1 阅读权限100积分4243精华5UID帖子金钱18275 威望1
UID帖子威望1 多玩草2509 草
小和尚来阅经 发表于
我写不来超级宏，求大神把我这个普通宏改写成超级宏，先谢谢了。
要求：1、添加自动扶摇开关，战斗中打开开 ...
你要给别人留个你的奇穴啊……
新人欢迎积分0 阅读权限30积分191精华0UID帖子金钱255 威望0
Lv.3, 积分 191, 距离下一级还需 59 积分
UID帖子威望0 多玩草0 草
.........................
新人欢迎积分0 阅读权限30积分100精华0UID帖子金钱158 威望0
Lv.3, 积分 100, 距离下一级还需 150 积分
UID帖子威望0 多玩草0 草
新人欢迎积分0 阅读权限10积分11精华0UID帖子金钱9 威望0
Lv.1, 积分 11, 距离下一级还需 4 积分
UID帖子威望0 多玩草0 草
惹我认为二位二位热瓦尔
新人欢迎积分0 阅读权限30积分195精华0UID帖子金钱277 威望0
Lv.3, 积分 195, 距离下一级还需 55 积分
UID帖子威望0 多玩草0 草
新人欢迎积分1 阅读权限30积分240精华0UID9416793帖子金钱440 威望0
Lv.3, 积分 240, 距离下一级还需 10 积分
UID9416793帖子威望0 多玩草10 草
啊啊啊啊啊啊啊啊啊啊啊啊
新人欢迎积分0 阅读权限30积分111精华0UID帖子金钱353 威望0
Lv.3, 积分 111, 距离下一级还需 139 积分
UID帖子威望0 多玩草0 草
奇穴好像是：玄黄，御龙，敏行，仁德，越渊，明辨，坚固，不息。点的是这几个，不过顺序不记得了。我求助啊，没大大们理我啊。
新人欢迎积分1 阅读权限40积分298精华0UID帖子金钱661 威望0
Lv.4, 积分 298, 距离下一级还需 702 积分
UID帖子威望0 多玩草0 草
问问王企鹅王
新人欢迎积分0 阅读权限20积分21精华0UID帖子金钱74 威望0
Lv.2, 积分 21, 距离下一级还需 29 积分
UID帖子威望0 多玩草0 草
新人欢迎积分0 阅读权限20积分22精华0UID帖子金钱51 威望0
Lv.2, 积分 22, 距离下一级还需 28 积分
UID帖子威望0 多玩草0 草
你的普通宏好用不？
新人欢迎积分0 阅读权限30积分199精华0UID帖子金钱471 威望0
Lv.3, 积分 199, 距离下一级还需 51 积分
UID帖子威望0 多玩草0 草
你的普通宏效果怎么样？
版主培训勋章
版主培训勋章
元宝专属一阶勋章。已绝版
需要金钱：1100
手机盒子客户端点击或扫描下载
Powered by

我要回帖

更多关于 剑网三丐帮pve宏 的文章

 

随机推荐