Table renumbering.

[donna]

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]

G'day "donna" <[email protected]>,

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: