Sub Make_200()
Dim cell As Range
For Each cell In Selection
If cell.Value 200 Then
cell.Value = 200
End If
Next
End Sub


Gord Dibben MS Excel MVP

On Tue, 20 Feb 2007 07:52:15 -0800, Moshe Rosenberg
wrote:

I need to batch update all cell values in a sheet over the value of 200 to
become 200.

How can I accomplish this?