![]() |
#1
|
|||
|
|||
![]()
I want a Word Macro that can find a word in a document then select everything from the end of that line that word was found in to the top of the document. Then do a copy and paste special to text. Here's what I have so far but once it moves to the top nothing is selected. Any suggestion?
signed confused. Sub test3() With ActiveDocument.Content.Find .Text = "Safety Stock" .Forward = True .Execute If .Found = True Then .Parent.Select Selection.Expand wdLine myRange = Selection End If End With ThisDocument.Bookmarks("\StartOfDoc").Select End Sub |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
VictoriaT8 | Excel | 3 | 02-22-2013 07:54 PM |
![]() |
Canni | Word | 2 | 08-29-2012 02:46 PM |
![]() |
msword270 | Word | 1 | 01-12-2012 11:41 AM |
Unable to select anything in an MS Word Document | PaulT | Word | 0 | 08-08-2011 07:45 PM |
![]() |
JosL | Office | 3 | 03-07-2009 12:40 PM |