Re: [users-fr] macro inversion

2007-12-20 Par sujet Laurent Godard

Bonjour Jacques

Dans un texte, je voudrais sélectionner quelques mots et les inverser 
(le dernier caractère de la sélection devient le premier).
Ce nouveau texte se lirait de droite à gauche, alors même que le reste 
du texte reste lisible normalement.


Quelqu'un aurait-il déjà une telle macro sous le coude ?


faite tres rapidement
il manque les securités habituelles
N'hesites pas à demander sur la liste [EMAIL PROTECTED]

Laurent

Sub inverseSelection

  selection = thisComponent.currentSelection(0)

  chaine = selection.string
  newChaine=

  for i= len(chaine) to 1 step -1
newChaine = newChaine + mid(chaine, i, 1)
  next i

  thisComponent.currentSelection(0).string = newChaine

End Sub


--
Laurent Godard [EMAIL PROTECTED] - Ingénierie OpenOffice.org - 
http://www.indesko.com
Nuxeo Enterprise Content Management  http://www.nuxeo.com - 
http://www.nuxeo.org

Livre Programmation OpenOffice.org, Eyrolles 2004-2006

-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



[users-fr] macro inversion

2007-12-19 Par sujet jacques-f

Bonsoir,

Dans un texte, je voudrais sélectionner quelques mots et les inverser 
(le dernier caractère de la sélection devient le premier).
Ce nouveau texte se lirait de droite à gauche, alors même que le reste 
du texte reste lisible normalement.


Quelqu'un aurait-il déjà une telle macro sous le coude ?

Merci

Jacques

-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]



Re: [users-fr] macro inversion

2007-12-19 Par sujet Laurent BALLAND-POIRIER

jacques-f a écrit :

Bonsoir,

Dans un texte, je voudrais sélectionner quelques mots et les inverser 
(le dernier caractère de la sélection devient le premier).
Ce nouveau texte se lirait de droite à gauche, alors même que le reste 
du texte reste lisible normalement.


Quelqu'un aurait-il déjà une telle macro sous le coude ?

Merci

Jacques

Bonjour,

Il serait plus judicieux de poser la question sur la liste prog-fr.

Laurent BP

-
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]