如何在Excel中的所有行内容添加斜杠?
image UploadPic/2012-02-08/132168689584.jpg UploadPic/2012-02-08/132168689539.jpg UploadPic/2012-02-08/132168689579.jpg UploadPic/2012-02-08/132168689580.jpg UploadPic/2012-02-08/132168689659.jpg UploadPic/2012-02-08/132168689698.jpg UploadPic/2012-02-08/132168689611.jpg UploadPic/2012-02-08/132168689621.jpg UploadPic/2012-02-08/132168689610.jpg UploadPic/2012-02-08/132168689658.jpg
有一个像上面的列(img),现在我想在UploadPic
(/ UploadPic)之前添加一个斜杠,并使用批处理。 我该怎么做?
这个简单的小macros将这样做到列A中的每个使用的单元格:
Sub AddSlash() Dim MyRNG As Range, cell As Range Set MyRNG = Range("A:A").SpecialCells(xlConstants) For Each cell In MyRNG cell.Value = "/" & cell.Value Next cell End Sub
如何/在哪里安装macros:
- 打开你的工作簿
- 进入VB编辑器(按Alt + F11)
- 插入一个新模块(插入>模块)
- 复制并粘贴您的代码(上面给出)
- 离开VBA (按Alt + Q)
- 保存为启用macros的工作簿
该macros已安装并可以使用。 按Alt-F8并从macros列表中select它。
control + f
replace标签
find:“UploadPic”replace为:“\ UploadPic”
点击 – 全部replace
我想在Find What中确定一些额外的文字。