如何在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:

  1. 打开你的工作簿
  2. 进入VB编辑器(按Alt + F11)
  3. 插入一个新模块(插入>模块)
  4. 复制并粘贴您的代码(上面给出)
  5. 离开VBA (按Alt + Q)
  6. 保存为启用macros的工作簿

该macros已安装并可以使用。 按Alt-F8并从macros列表中select它。

 control + f 

replace标签

find:“UploadPic”replace为:“\ UploadPic”

点击 – 全部replace

我想在Find What中确定一些额外的文字。