![]() |
#1
|
|||
|
|||
![]()
Hi !
(this is my 1st message ever on this forum !) I'm trying to do a simple thing, but I' missing something : I want to add an "s" at the end of the current word. I wrote a macro to do this : Code:
Sub Pluriel() ' ALT + S Application.Selection.Words(1).Select Selection.MoveRight Unit:=wdCharacter, Count:=1 Selection.MoveLeft Unit:=wdCharacter, Count:=1 Selection.TypeText Text:="s" End Sub For instance : assiette >>> assiettes = fine (provided the word is in the middle of a sentence) but : assiette, >>> assiettse, = wrong How should I proceed to avoid this ? Many thanks ! |
Thread Tools | |
Display Modes | |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
gazeranco | Word VBA | 8 | 10-29-2016 12:13 AM |
![]() |
pstein | Word | 3 | 08-15-2012 05:08 AM |
![]() |
KIM SOLIS | Excel | 2 | 11-04-2011 06:09 PM |
![]() |
persist | Word | 2 | 04-07-2010 09:52 PM |
![]() |
Styler001 | Word | 4 | 01-25-2010 06:40 PM |