New feature! Upgrade and increase expert visibility of your issues with Priority Questions.
Sub FindReplaceAll() 'PURPOSE: Find & Replace text/values throughout entire workbook 'SOURCE: www.TheSpreadsheetGuru.com Dim sht As Worksheet Dim fnd As Variant Dim rplc As Variant fnd = "April" rplc = "May" For Each sht In ActiveWorkbook.Worksheets sht.Cells.Replace what:=fnd, Replacement:=rplc, _ LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase:=False, _ SearchFormat:=False, ReplaceFormat:=False Next sht End Sub
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.