Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!
Next Application.ScreenUpdating = False Set rg = Intersect(Range("C:C"), ActiveSheet.UsedRange) For Each c In rg.Cells 'Only search column C Select Case c.Value Case "CT" 'Old value c.Value = "Y" 'New value End Select Next
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.