Bu makrodaki hata nedir?

[erkanfun]

Sub Makro1()
Range("I2").Value = Evaluate("SUBSTITUTE(A2;CHAR(10);"")")
End Sub

 

[usubaykan]

Merhaba;
Bu şekilde deneyin birde

Range("I2").Value = WorksheetFunction.Substitute(Range("A2"), Chr(10), "")

Range("I3").Formula = Evaluate("=SUBSTITUTE(A2,"" "","""")")