Formato a texto

Con formato... para textos... yo no conozco como hacerlo. Pero podrías lograrlo si te apoyas en VBA, p.e.:

Sub Prueba()
Dim n%
For n = Len(Selection) - 4 To 4 Step -4
If Len(Selection.Value) < 29 Then Selection.Value = _
Left(Selection.Value, n) & " " & Mid(Selection.Value, n + 1)
Next n
End Sub


Saludos: Antonio.
***********************

"Desastres" escribió en el mensaje news:

Buenas tardes.
Puede alguien decirme como dar formato a una celda para que la cadena
AD2100320025123456AJ3514, se muestre como AD21 0032 0025 1234 56AJ 3514?
Saludos y ...
Excel entes vibraciones
Des As Tres

No lo imprimas,no merece la pena.