VBA for each

[jakobt]

Want to create VBA for each code to look for cells in i12:i50 and substitute the string Sep with Oct
The string could for instance be: corp sep accrual which should be converted to corp oct accrual


Sub journal()
Dim describ As String


describ = Range("i12:i50")


for each describ


if


End Sub

 

[Trevor G]

Record a macro and use find replace, this code will change based on your content:

Sub mcrRep()
'
' mcrRep Macro
'
'
Cells.Replace What:="sep", Replacement:="oct", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
End Sub