![]() |
|
#1
|
||||
|
||||
![]() This code selects the current word. If the word is followed by a space it also selects that. If it is followed by punctuation, it doesn't select the punctuation. Code:
Sub GetIt() Dim aWord As Range Set aWord = Selection.Words(1) aWord.Select End Sub
__________________
Andrew Lockton Chrysalis Design, Melbourne Australia |
![]() |
Tags |
selecting text |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
stevec5088 | Word | 1 | 12-14-2016 02:45 PM |
![]() |
Grasor | Word VBA | 2 | 10-11-2016 08:50 PM |
Word 2013 Insertion Point stops blinking | NeilSC | Word | 0 | 12-13-2013 12:19 PM |
![]() |
pmahoney14 | Word | 1 | 05-24-2012 04:17 PM |
![]() |
joannetk | Word | 4 | 03-10-2011 04:26 AM |