wklej rekordy do Worda i zamień znaki ^p na pusto i ponownie wklej do
Excela,
W moich szybkich testach wygląda ok
--
Pozdr.
Cynio
Sub vv()
'
Cells.Replace What:=vbLf, Replacement:=" ", LookAt:=xlPart,
SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False,
ReplaceFormat:=False
End Sub
pozdrawiam