Thread: Find and Replace within range
View Single Post
 
Old 11-18-2010, 05:06 AM
Kimberly Kimberly is offline Windows 7 Office 2010 (Version 14.0)
Expert
  
Join Date: May 2010
Posts: 517
Kimberly is on a distinguished road
Default
Selection.Replace What:="<([0-9]{1,5})>([-|^=])<([0-9]{1,5})>", Replacement _
:="<Pages>^&</Pages>", LookAt:=xlPart, SearchOrder:=xlByRows, MatchCase _
:=False, SearchFormat:=False, ReplaceFormat:=False
Reply With Quote