Hi All,

I would like to replace a part of the text in A3 by "" (empty)for the
value in A5. In short the substitute worksheetfunction ... it is
bugging!
Any reason why?


Sub d()
Dim naam As String

naam = Application.WorksheetFunction.Substitute(ws.Range( "A3").Value,
ws.Range("A5").Value, "")
MsgBox naam
End Sub