remplacer espace

[taupe]

bonjour,
je cherche a remplacer 10 espace(l'espace minimum est de 10) vide entre 2 mots par : la fonction edition remplacer ne reconnait pas espace vide
ex
C00 FORFAIT AU CBU EURO par C00 FORFAIT AU CBU: EURO
ou 5 MONOSPACE 562,60 par 5 MONOSPACE: 562,60
merci

 

[Pat5]

Bonjour taupe

=supprespace(TaCellule)

Pat5 ;o)

 

[taupe]

je voudrais remplacer les 10 espaces par :

 

[Pat5]

Re

Je viens de faire Edition.......Remplacer...... Espace par : et ça marche impeccable.

Je comprends pas

Pat5 ;o)

 

[Pat5]

Re

Par VBA :

Sub RemplacerEspaceParDeuxPoints()

Cells.Replace What:=" ", _
Replacement:=":", _
LookAt:=xlPart, _
SearchOrder:=xlByRows

End Sub

Salut ;o)