Excel2010利用宏进行批量替换与填充

在Excel中，有时一些操作，并不是很好用函数完成，如把去掉单元格中某些字符并把它进行格式转化填充到另外的列中去，这些函数当然可以完成，但是用宏可以更快的完成，下面举一个例子，如有10000条字符串，格式为key=value的形式，要把把key填充到一列中去，value填充到另一列中去，操作步骤为：

• 打开Excel的宏命令窗口
• 选择“插入-模块”命令，在开打的窗口中编写代码：
Sub 替换()
    For i = 1 To 5

        a = Cells(i, 1).Value
        Cells(i, 2).Value = Split(a, "=")(0)
        Cells(i, 3).Value = Split(a, "=")(1)
   
    Next i
End Sub
• 选择菜单中的运行命令来执行

OK我们看到相应的单元格里的值已经被填充好了。

在上面的代码中，实现的功能是把第一列中的值进行以“=”分割，分割后的数组第一个元素填充到第二列中去，第二个元素填充到第三列中去

在Office中，宏命令使用的语言是VB，我们要按照VB的语法要求来编写相应的代码，大家可以根据需求相应的改动代码达到预期的效果

评论

1 楼 shine22fmf 2012-07-24