excel宏来改变列中的值

Question

我有一个文件每个月都有几列超过50K行。我通常需要使用不同的值替换B列中的值，例如，如果B列中的任何字段包含ASD，则将其替换为XYZ。还有一个需要替换的价值清单。同样如上所述，旧值在B列中可以不止一次，并且需要被替换。

任何帮助将是伟大的。

感谢

Answer 1

试一下：

Sub test() 
'this will get you the last row number in column "B" 
lastRow = Sheets("SheetName").Cells(Sheets("SheetName").Rows.Count,"B").End(xlUp).Row 

'loop through all cells in coulmn "B" and replace text as needed 
For i = 1 To lastRow 
    'you can add multiple lines for each values that needs to be replaced 
    Sheets("SheetName").Cells(i, 2).Value = Replace(Sheets("SheetName").Cells(i, 2).Value, "ABC", "XYX") 
Next i 

End Sub 

其中 'SHEETNAME' 是您的工作表的名称。希望这就是你正在寻找的！

Answer 2

录制宏[查看>宏>记录宏]

做搜索+替换操作

停止录制。

现在查看宏>编辑。

您将看到新录制的宏，它将执行查找+替换，您可以根据自己的确切要求进行编辑。