Selecting just one word in document

When I use:

Selection.Words.Count

with nothing selected I get Selection.Words.Count =1

I get the same result when I actually select just one word (which I
expected).

Likewise if I use Selection.Words.First, I get then next word after cursor.

How do I know if the user REALLY just selected one word?
thanks

Jezebel
Thu Aug 31 05:06:03 CDT 2006

You need to examine what they've selected. You might find the LIKE operator
helpful.

The problem is that 'word' is actually quite hard to define. The definition
used for the Words collection is something like a) any sequence of these
characters [a-zA-Z0-9'] delimited by any characters not in that set, plus b)
any characters other than space, with sequences of the same character
treated as one word. I suspect that this definition was arrived at to
facilitate functions like Find and Replace. It's obviously not very helpful
for strictly lexical purposes.



"Jim" <someone@yahoo.com> wrote in message
news:etKynzNzGHA.1292@TK2MSFTNGP03.phx.gbl...
> When I use:
>
> Selection.Words.Count
>
> with nothing selected I get Selection.Words.Count =1
>
> I get the same result when I actually select just one word (which I
> expected).
>
> Likewise if I use Selection.Words.First, I get then next word after
> cursor.
>
> How do I know if the user REALLY just selected one word?
> thanks
>
>

Jean-Guy
Thu Aug 31 09:57:25 CDT 2006

Jim was telling us:
Jim nous racontait que :

> When I use:
>
> Selection.Words.Count
>
> with nothing selected I get Selection.Words.Count =1
>
> I get the same result when I actually select just one word (which I
> expected).
>
> Likewise if I use Selection.Words.First, I get then next word after
> cursor.
> How do I know if the user REALLY just selected one word?
> thanks

With Selection.Range
If .Start = .End Then
MsgBox "Nothing is currently selected"
Else
MsgBox "Something is actually selected"
End If
End With

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP
jmarcilREMOVE@CAPSsympatico.caTHISTOO
Word MVP site: http://www.word.mvps.org

Jim
Thu Aug 31 14:54:45 CDT 2006

- thanks - merci.

"Jean-Guy Marcil" <NoSpam@LeaveMeAlone> wrote in message
news:OdgeI3QzGHA.4104@TK2MSFTNGP02.phx.gbl...
> Jim was telling us:
> Jim nous racontait que :
>
>> When I use:
>>
>> Selection.Words.Count
>>
>> with nothing selected I get Selection.Words.Count =1
>>
>> I get the same result when I actually select just one word (which I
>> expected).
>>
>> Likewise if I use Selection.Words.First, I get then next word after
>> cursor.
>> How do I know if the user REALLY just selected one word?
>> thanks
>
> With Selection.Range
> If .Start = .End Then
> MsgBox "Nothing is currently selected"
> Else
> MsgBox "Something is actually selected"
> End If
> End With
>
> --
> Salut!
> _______________________________________
> Jean-Guy Marcil - Word MVP
> jmarcilREMOVE@CAPSsympatico.caTHISTOO
> Word MVP site: http://www.word.mvps.org
>

Cindy
Fri Sep 01 10:36:21 CDT 2006

Hi Jean-Guy,

> > How do I know if the user REALLY just selected one word?
>
> With Selection.Range
> If .Start = .End Then
> MsgBox "Nothing is currently selected"
> Else
> MsgBox "Something is actually selected"
> End If
> End With
>
How about Selection.Type?
If Selection.Type = wdSelectionIP Then

Cindy Meister
INTER-Solutions, Switzerland
http://homepage.swissonline.ch/cindymeister (last update Jun
17 2005)
http://www.word.mvps.org

This reply is posted in the Newsgroup; please post any
follow question or reply in the newsgroup and not by e-mail
:-)

Jean-Guy
Fri Sep 01 12:39:07 CDT 2006

Cindy M. was telling us:
Cindy M. nous racontait que :

> Hi Jean-Guy,
>
>>> How do I know if the user REALLY just selected one word?
>>
>> With Selection.Range
>> If .Start = .End Then
>> MsgBox "Nothing is currently selected"
>> Else
>> MsgBox "Something is actually selected"
>> End If
>> End With
>>
> How about Selection.Type?
> If Selection.Type = wdSelectionIP Then

Yes!

I was actually looking for that as I remembered that there was a property
that could check if the selection was an insertion point or not. I thought
it was something like "InsertionPoint"... Obviously I did not find it, so I
came up with a hack instead!

Thanks!

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP
jmarcilREMOVE@CAPSsympatico.caTHISTOO
Word MVP site: http://www.word.mvps.org