加入收藏 | 设为首页 | 会员中心 | 我要投稿 | RSS
现在的位置:首页 > 会员中心 > 查看信息:【vba代码】替换百份excel内容
提示信息
您还未登陆,点击这里进行登陆操作;注册请点击这里

标题: 【vba代码】替换百份excel内容
查看权限: 需要 [年费会员] 级别以上才能查看。
发布时间: 2023-03-11 15:07:46
信息简介: Sub Macro1()     Dim arr, MyPath$, MyName$, sh As Worksheet, i&     arr = [a1].CurrentRegion cFile = Application.GetOpenFilename '文件选择窗口 If cFile <> False Then wz = InStrRev(cFile, "\")