user_mobilelogo

 

Une recherche/remplacement en caractères génériques du type :

  • chercher: [!^013]{15}
  • remplacer par : \1^013

insère une marque de paragraphe tous les 15 caractères.

 

Sinon par macro :

Sub CoupeTexte()
'Macro écrite par Alain
Dim i
For i = 0 To 10
Selection.MoveRight Unit:=wdCharacter, Count:=256 Selection.TypeParagraph ' Pour saut de ligne visible
Selection.TypeParagraph
Next i
End Sub

 

 

Statistiques

Aujourd'hui2084
Hier1297
Cette semaine2084
Ce mois34413
Total depuis 200411279631

19
visiteurs actuellement en ligne