Errata

Word Hacks

The errata list is a list of errors and their corrections that were found after the product was released.

The following errata were submitted by our customers and have not yet been approved or disproved by the author or editor. They solely represent the opinion of the customer.

Color Key: Serious technical mistake Minor technical mistake Language or formatting error Typo Question Note Update

Version Location Description Submitted by Date submitted
Printed Page 57
In code for cmdOpen_Click() mid page

In third line of Trap: code, there should be a space after the "&" and before the "_"
for line continuation

Anonymous   
Printed Page 83
Through to p.85

- During the instructions in the 1st paragraph of p.83, [Insert paragraph number]
should be checked. Otherwise the heading text rather than the paragraph number will
be displayed. This change should be reflected to Fig 3-36, 3-37 and 3-39.

- In the 1st line of the code in p.85,
Text:="ChapterLabel", _
should be
Text:="s ChapterLabel", _
for the same reason.

Anonymous   
Printed Page 128
14th line of the code

c.Author & vbTab & c.Range.text & vbCr
should be:
c.Range.text & vbTab & c.Author & vbCr

Anonymous   
Printed Page 132
18th line of the doc2outlookemail()

sDocText = Replace(sDocText, Chr(13), String(2, Chr(13))
should be
sDocText = Replace(sDocText, Chr(13), String(2, Chr(13)))

Anonymous   
Printed Page 148
MakeAutoXRef() code

- In 15th and 29th lines, GetParaIndex should be GetParagraphIndex.

Anonymous   
Printed Page 271
"if" clause of "FieldCodeToText"

Because an entire range that may not consist of a single (topmost) field is passed to the initial call to FieldCodeToText by ConvertSelectedFieldsToText (and thus becomes fngOrig), the last call to FieldCodeToText (and/or the last iteration of the loop) will have the entire range replaced by the "rngOrig.Text =" clause in the if clause of the conditional. The solution is to replace the statement in the if clause of the condition with the following:

Set rng = rngOrig.Duplicate
rngOrig.Fields(1).Select
Selection.Range.Text = "{" & _
rngOrig.Fields(1).Code.Text & "}"
rng.Select

Anonymous  Jun 12, 2011