Mega Code Archive

 

Categories / VisualBasic Script / Forms

 

Replace information in all sheets of the workbook

Sub ChgInfo()     Dim Sht As Worksheet     For Each Sht In Worksheets         Sht.Cells.Replace What:="old", Replacement:="new", LookAt:=xlPart, MatchCase:=False     Next End Sub