Home | Contact Us | FAQ | Search & Site Map | Link to Us
Sign In | Join | Other 45 Sites in Network
Home
DiscussionsAccessExcelInfoPathOutlookPowerPointPublisherWord
DirectoryUser Groups
Related Topics
Outlook ExpressInternet ExplorerWindowsMS Server ProductsMore Topics ...

MS Office Forum / Word / Programming / October 2005

Tip: Looking for answers? Try searching our database.

Table renumbering.

Thread view: 
Enable EMail Alerts  Start New Thread
Thread rating: 
donna - 19 Oct 2005 18:36 GMT
I am trying to replace Appenidix # with Table #.#  Only difference is I
cannot replace all Appendix # with Table #.#. I mean how will I use fields to
replace numbers(#.#) using find and replace command. My files can be of
5-50page it depends.

Any help.. it's very urgent

I am using following macro to do this.

Selection.Find.ClearFormatting
   With Selection.Find
       .Text = "Appendix 1"
       .Replacement.Text = "Table "
       .Forward = True
       .Wrap = wdFindContinue
       .Format = False
       .MatchCase = False
       .MatchWholeWord = False
       .MatchWildcards = False
       .MatchSoundsLike = False
       .MatchAllWordForms = False
       Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty,
Text:= _
       "SEQ Table\c ", PreserveFormatting:=True
   Selection.TypeText Text:="."
   Selection.Fields.Add Range:=Selection.Range, Type:=wdFieldEmpty, Text:= _
       "SEQ Table\c ", PreserveFormatting:=True
   End With

   
Word Heretic - 21 Oct 2005 14:19 GMT
G'day "donna" <donna@discussions.microsoft.com>,

U r finding the explicit text of appendix 1. Why not find "appendix"
and test if style = "headin blah" or even its level being less than
body text?

Steve Hudson - Word Heretic

steve from wordheretic.com (Email replies require payment)
Without prejudice

donna reckoned:

>I am trying to replace Appenidix # with Table #.#  Only difference is I
>cannot replace all Appendix # with Table #.#. I mean how will I use fields to
[quoted text clipped - 26 lines]
>
>    

Rate this thread:






 
Sign In
Join
My Latest Posts
My Monitored Threads
My Blog
My Photo Gallery
My Profile
My Homepage

Start New Thread
Enable EMail Alerts
Rate this Thread



©2008 Advenet LLC   Privacy Policy - Terms of Use
This website includes both content owned or controlled by Advenet as well as content owned or controlled by third parties.