Prova così.
edit. Prova anche questocodice:Sub rimuoviAccapo() Dim foglio As Worksheet For Each foglio In Worksheets With foglio.Cells .Replace vbLf, " " End With Next End Sub
=SOSTITUISCI(A1;CODICE.CARATT(10);"
")
Prova così.
edit. Prova anche questocodice:Sub rimuoviAccapo() Dim foglio As Worksheet For Each foglio In Worksheets With foglio.Cells .Replace vbLf, " " End With Next End Sub
=SOSTITUISCI(A1;CODICE.CARATT(10);"
")