Thread: Excel VBA function range.replace
View Single Post
 
Old 03-25-2019, 03:09 AM
p45cal's Avatar
p45cal p45cal is offline Windows 10 Office 2016
Expert
  
Join Date: Apr 2014
Posts: 948
p45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond reputep45cal has a reputation beyond repute
Default
try adding one line before your With..End With block:


Set dummy = Worksheets(1).Range("A1:A1").Find("Dummy", LookIn:=xlValues)
With Columns("F:H")
.Replace What:="Dec", Replacement:="Dez", LookAt:=xlPart, ....


and report back.
Reply With Quote