Editorial Style Sheet Macro

Last week's newsletter provided a style sheet that editors can use to keep track of style decisions while editing in Microsoft Word. If you didn't get that style sheet, you can download it here:

http://www.editorium.com/ftp/stylesheet.zip

Hilary Powers was kind enough to provide her StyleThat macro in last week's newsletter, and this week I've adapted that macro to work with the editorial style sheet. If you select some text in a document you're editing and then run this macro, it will switch to your editorial style sheet and paste the text under the alphabetical heading where it belongs: ABCD, EFGH, and so on. See last week's newsletter for more information:

http://lists.topica.com/lists/editorium/read/message.html?mid=1716659834

And now, here's the macro:

'THE MACRO STARTS HERE
Sub StyleThat()
'Macro adapted by Hilary Powers 1/30/04; updated 4/6/04
'Adapted by Jack M. Lyon for use with editorial style sheet
If Selection.Type = wdSelectionIP Then  'No selection
GoTo HedBack
Else
FirstChar = Asc(Selection.Characters.First)
If FirstChar > 64 And FirstChar < 69 Then MySearch = "ABCD^p"
If FirstChar > 68 And FirstChar < 73 Then MySearch = "EFGH^p"
If FirstChar > 72 And FirstChar < 77 Then MySearch = "IJKL^p"
If FirstChar > 76 And FirstChar < 81 Then MySearch = "MNOP^p"
If FirstChar > 80 And FirstChar < 85 Then MySearch = "QRST^p"
If FirstChar > 84 And FirstChar < 91 Then MySearch = "UVWXYZ^p"
If FirstChar > 96 And FirstChar < 101 Then MySearch = "ABCD^p"
If FirstChar > 100 And FirstChar < 105 Then MySearch = "EFGH^p"
If FirstChar > 104 And FirstChar < 109 Then MySearch = "IJKL^p"
If FirstChar > 108 And FirstChar < 113 Then MySearch = "MNOP^p"
If FirstChar > 112 And FirstChar < 117 Then MySearch = "QRST^p"
If FirstChar > 116 And FirstChar < 123 Then MySearch = "UVWXYZ^p"
If FirstChar > 90 And FirstChar < 97 Then MySearch = "Comments:^p"
If FirstChar < 65 Or FirstChar > 122 Then MySearch = "Comments:^p"
Selection.Copy
WordBasic.NextWindow
WordBasic.StartOfDocument
Selection.Find.ClearFormatting
With Selection.Find
.Text = MySearch
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = True
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = False
End With
Selection.Find.Execute
Selection.MoveRight
Selection.Paste
Selection.TypeParagraph
GoTo Final
End If
HedBack:
WordBasic.NextWindow
Selection.MoveRight Unit:=wdCharacter, Count:=1
Final:
End Sub
'THE MACRO ENDS HERE

If you don't know how to use such macros, you can find out here.

And you can learn how to assign them to a hot key here:

http://www.topica.com/lists/editorium/read/message.html?mid=1713088939

Note that you don't have to use the macro with *my* style sheet. It will work with any document in which you've included the following headings, each followed by a carriage return:

ABCD

EFGH

IJKL

MNOP

QRST

UVWXYZ

Comments:

_________________________________________

READERS WRITE

Last week, expert word whacker Hilary Powers sent her StyleThat macro, which I proceeded to gum up. The problem was, it didn't want to work correctly in Word 2000; possibly some of the commands are specific to Word 2003. At any rate, here is Hilary's macro in its pristine state, and many thanks to her for providing it.

Hilary wrote, "The macro relies on having two [and only two] files open at a time. The truly charming thing is that you can use one hot key for both chores: putting something on the style sheet and also priming the style sheet for its next use and returning to the main document.

'THE MACRO STARTS HERE
Sub StyleThat()
' Macro adapted by Hilary Powers 1/30/04; updated 4/6/04
If Selection.Type = wdSelectionIP Then
GoTo HedBack
Else
Selection.Copy
WordBasic.NextWindow
Selection.PasteAndFormat (wdPasteDefault)
GoTo Final
End If
HedBack:
Selection.TypeParagraph
WordBasic.NextWindow
Selection.MoveRight Unit:=wdCharacter, Count:=1
Final:
End Sub
'THE MACRO ENDS HERE

If you don't know how to use such macros, you can find out here.

And you can learn how to assign them to a hot key here:

http://www.topica.com/lists/editorium/read/message.html?mid=1713088939

_________________________________________

RESOURCES

I've been fighting the battle against spam (junk email) but not very effectively, even though I've tried a couple of top-notch spam-fighting programs. Then this week I decided to try SpamArrest, and I'm thrilled to say it's actually won the war. Boy, has my inbox been quiet.

When people send me an email message, they receive an email message in return that asks them to click a link to register themselves (a one-time operation) as someone who can send me messages. Spammers, of course, won't bother to do this, which basically means no more spam. It's easy to preregister family, friends, associates, and email newsletters to which I subscribe. The completely online program (no software involved) gives me complete control over how spam is handled, and it's very easy to use.

If you'd like to know more, click here:

http://spamarrest.com/affl?1403707

And if you decide to sign up, please do so through the link above. Since I'm now a SpamArrest affiliate, your support will help keep Editorium Update alive and kicking. Thanks!

Insert Boilerplate

Boilerplate is text you can use over and over again as needed. For example, the Fine Print section of this newsletter is boilerplate. Here's a little-known but useful way to create boilerplate in Microsoft Word:

1. Create a new document to hold all of your boilerplate text.

2. Paste your boilerplate text into it (obviously enough).

3. Select each chunk of boilerplate text and apply a bookmark to it (Insert > Bookmark). Make the bookmark names short and easy to remember. You may even want to keep a list of the bookmarks for reference. (You'll see why in just a minute.)

4. Save your document with a name like "Boilerplate" in an easy-to-find folder.

Now, when you're working on some document and want to insert some boilerplate text, here's what to do:

1. Click Insert > File.

2. Navigate to your Boilerplate file and click it.

3. Click the "Range" button.

4. Enter the name of the bookmark for the chunk of boilerplate you want to use. Unfortunately, Word won't give you a dropdown list of the bookmarks, which is why you should use short, memorable bookmark names and keep a list of what they are.

5. Click the "Insert" button.

The boilerplate for the bookmark you entered will be inserted into your document.

_________________________________________

READERS WRITE

Answering the question "How many pages per hour should someone be able to edit on-screen?" expert word-whacker Hilary Powers wrote:

"Should" is a hard word to apply, as the work varies so much according to the condition of the manuscript and the skills of the editor. But one thing I can say: pages-per-hour production should not be lower than the equivalent paper speed.

For the purposes of pricing, paper speed expectations remain the standard, much as 250 words remains the standard page decades after the demise of the 10-pitch typewriter.

For doing the work, I find that I'm reliably between 150% and 300% of the paper speed expectations--but I've been counting keystrokes and squeezing electrons till they scream for ten years now. It'd be a very reasonable first goal to try to match paper speed on-screen--without rushing. Rather, look for ways to get the effects you want as easily as possible . . . and keep looking after you get back to your paper level, as by that point you'll probably have no more than scratched the surface of what's possible.

A job I finished a bit ago--a near-300-page manuscript in very good shape, well written and with a charming subject--had a net thruput of 14.5 pages per hour. That's close to the top I've achieved thus far for straight editing, but not the absolute max if memory serves.

------------------------

Hilary also wrote:

Here's another wrinkle on the title-case macro:


Sub SentenceTitle()
' Macro written 3/20/2004 by Hilary Powers
Selection.Range.Case = wdLowerCase
Selection.MoveLeft Unit:=wdCharacter, Count:=1
Selection.Find.ClearFormatting
With Selection.Find
.text = ":"
End With
Selection.Find.Execute
Selection.MoveRight Unit:=wdCharacter, Count:=2
Selection.Range.Case = wdNextCase
End Sub

It's for converting two-part title-case titles to sentence case: Select everything but the first word and hit the hot key, and it all goes lowercase except the word following the colon. . . . A godsend for a 50-page reference list with mixed formatting that needs to go to APA. (A refined version would let you select the whole title and then uppercase both the first word and the word after the colon, but I got lazy.)

If you don't know how to use macros like that one, you can find out here:

Many thanks to Hilary for her terrific tips.

_________________________________________

RESOURCES

Where does the term "boilerplate" come from? You can find out at World Wide Words and The Word Detective, both wonderful sites for those interested in words:

http://www.quinion.com/words/index.php

http://www.word-detective.com/index.html

Object Browser

Have you ever wished you had a way to move quickly from one footnote to the next in Word? How about from one edit to the next? One heading to the next? If so, you need to know about Word's Object Browser, which is poorly documented but richly useful.

The Object Browser lives at the bottom of the scroll bar on the right side of your Word window. It consists of three buttons, which look something like this:

^

o
v

There's a double up-arrow on top, a small round button in the middle, and a double down-arrow on the bottom. The arrows take you to the next or previous something, and the button in the middle lets you pick what that something will be. Just click it to see and select the various options, which include:

* Go To

* Find

* Edit

* Heading

* Graphic

* Table

* Field

* Endnote

* Footnote

* Comment

* Section

* Page

That's a lot of stuff! Note that Go To will take you to whatever you've selected in Word's Go To feature, which you can summon up by clicking the Go To button in the Object Browser (or by pressing CTRL + G). And that means you can add the following items to the list of things you can browse:

* Line

* Bookmark (selectable)

* Comment (selectable by reviewer)

* Field (selectable)

* Equation

* Object (selectable)

Similarly, the Find button will open the Find dialog, allowing you to search your document as usual. But after you've found the first instance of the thing you're searching for, you can use the Object Browser to jump to the next one. And the next one. And the previous one. Whatever.

This would really be slick if we just had some keyboard shortcuts to do our browsing instead of having to click those tiny buttons. Well, okay, the shortcuts are CTRL + PAGE DOWN and CTRL + PAGE UP. Enjoy!

Thanks to Meg Cox for suggesting this topic.

_________________________________________

READERS WRITE

After reading last week's article on displaying pages two up, Julian Jenkins wrote:

Thanks for this advice. I now have the multiple pages button on my Formatting toolbar as suggested. However, the same thing can be achieved by selecting "Two Pages" on the zoom menu (underneath the various choices of percentages to zoom to).

------------------------------

Aaron Shepard wrote:

If you select "Different Odd and Even Headers and Footers," Word will show odd pages on the right under Print Preview. In Word 98 for Mac, I'm going to Format > Document > Layout. Click "Different Odd and Even" and apply to whole document. I think I first used it with Word 2001 for the Mac, but I'm not sure. On the PC, it's under File > Page Setup.

Word 98 doesn't have the option on the zoom menu. Simply choosing a small percentage for zoom does bring up multiple pages, but there's a difference. If I use the Multiple Pages button, the pages automatically expand to fit the window. That doesn't happen with the zoom setting.

------------------------------

Donald Hawkins wrote:

I liked your idea of showing pages two-up as described in the latest issue of your newsletter. You might mention that even after you copy the Multiple Pages button to another toolbar, there's an extra step to getting two-up pages. You still have to pick the configuration you want (1x2 pages, 1x3, etc.)--it doesn't go directly to the 2 page display. And when you're done and want to go back to normal view, you have to adjust the zoom back to 100%. (On my screen, print preview comes up at 49% zoom.)

------------------------------

Chuck Tucker wrote:

I suggest a much simpler way to display pages Two Up. When I want to see two pages side by side in Word I simply hold the Ctrl key down and rotate the wheel on the mouse until I see two pages (or 3 or 4 or whatever) side by side. I can easily edit either page, move to other pages, etc. All I have done is change the zoom factor, and I don't need to go to Print Preview to do it.

I would also mention that in Word 2003 they have added a new feature under the View menu called "Reading Layout" that automatically generates a Two Up display with side-by-side views of the pages. There is also an associated Toolbar. You can change the zoom factor in this view and it remains two side-by-side pages. You can perform all usual edits on the pages. Scrolling down brings up the next two pages, etc. This feature is tied in with the Reviewing capabilities of Word--something I haven't pursued in any detail yet, but it looks like more reviewing features than were present in earlier versions.

Many thanks to all for their terrific tips.

_________________________________________

RESOURCES

If you're just getting started in Microsoft Word, you may appreciate the basic Word tutorials at Electric Teacher:

http://www.electricteacher.com/tutorials.htm

Two Up

As a book editor, I often want to see the pages of a book I'm working on as "two up"--that is, two pages at a time, side by side on my screen. This is easily done in Print Preview, of course:

1. Click "File > Print Preview."

2. Click the "Multiple Pages" button--it's green and has four little pages on it.

3. On the little menu that pops up, point your mouse at the second of the first two pages, displaying the notation "1 X 2 Pages" at the bottom of the menu.

4. Click that second page.

Now two side-by side pages should be displayed on your screen.

You can actually work on these pages by clicking the Magnifier button (a toggle) on the Print Preview toolbar (second button from the left). Working in Print Preview always seems kind of clunky to me, however. So I've set up Word to display multiple pages in regular old Print Layout view (View > Print Layout):

1. Click "File > Print Preview."

2. Right-click the Print Preview toolbar and click "Customize."

3. Hold down the CTRL key (to copy rather than move) and drag the Multiple Pages button to a different toolbar--the Formatting toolbar should do nicely.

4. Click the Close button.

Now you have a copy of the Multiple Pages button on your Formatting toolbar. Click it, as explained above, to display pages two up. Pretty slick!

There's just one problem: Word displays those two pages with the odd page on the left and the even page on the right--exactly the opposite of what you'd see in a printed book. It's a little confusing, if you ask me. The workaround is to create a blank section page at the beginning of your document and number it as page 0. Here's how:

1. Place your cursor at the very top of your document (CTRL + HOME).

2. Click "Insert > Break."

3. Under "Section break types," click "Odd page."

4. Click the OK button.

5. Click "Insert > Page Numbers."

6. Click the Format button.

7. Under "Page numbering," click "Start at."

8. In the "Start at" box, enter a zero.

9. Click the OK button.

10. Click the Close button.

Now when you display pages two up, you'll see odd pages on the right, where they belong.

I don't recommend showing pages two up while *editing* a document, but for page layout or overall document review, it's tough to beat. Just page down, review your pages, page down, review your pages, tweaking and refining as you go. I'm still amazed that it's possible to do this in good old Microsoft Word.

____________________________________________________

_________________________________________

RESOURCES

The FontSite offers great fonts, and a number of them are free. As the site says, "The following fonts are available for a limited time at 100% off the regular price. Check back regularly as we plan to offer other typefaces and type-related shareware programs and utilities we believe should be part of one's typographic toolkit."

http://www.fontsite.com/Pages/FFDownloads.html

Size and Zoom

I recently noticed that one of my colleagues, a fellow editor, was reading a document set in 10-point type, with the lines running all the way across his giant 21-inch monitor. He was having a terrible time "tracking" from the end of one line to the beginning of the next, and he was squinting, bending forward in his chair, and generally looking miserable.

"Why don't you shrink the window?" I asked.

"What?" he said.

"Size the window so it's not so wide. You'll be able to read more easily."

"How do I do that?" he asked.

"You know those three little boxes on the upper right? The left one minimizes the window, and the right one closes it."

"Yes."

"The middle one makes it so you can size the window." [As you've noticed, my colleague was using a PC. On a Macintosh, you can just grab the lower right of a window and size to your heart's content.]

"Show me," he said.

I took the mouse and clicked the middle "Restore" button (which looks like two cascading windows). Then I positioned the mouse pointer on the right-hand border of the window, pressed and held the left mouse button, and sized the window to about six inches across.

Next, I clicked View > Zoom and bumped up the Zoom size to 200 percent.

"How's that?" I asked.

"Lots better," he said.

If you usually edit a document with the Word window stretching all the way across your screen, you might want to change your strategy. If you were designing a book, you probably wouldn't allow a line length of more than about 24 picas (four inches). Otherwise, the text would be too hard too read. You won't torture your readers, so why torture yourself?

Another thing: If you work with a wide, wide window, you'll find yourself scrolling and scrolling and scrolling back and forth on a line. If your window is relatively narrow, you can often move to a certain word by scrolling one or two lines down (a keystroke or two) rather than 50 characters across. You may not realize how much time you spend scrolling through text, but it does add up.

Finally, remember that you don't have to look at text in its actual size. Zoom was invented for a reason. Go ahead, make your text so you can read it from six feet away. Amaze your friends. Make your life easier. That's what all these tools are for.

_________________________________________

RESOURCES

In 2001, I wrote a couple of articles about using sample text while designing a book or generally experimenting with Word:

http://www.topica.com/lists/editorium/read/message.html?mid=1705763701

http://www.topica.com/lists/editorium/read/message.html?mid=1705865120

But if you're tired of lorem ipsum and that quick brown fox, you might be interested in the ungreek.toolbot engine, an online tool that gives you the option of several different source texts from which to generate sample (gibberish) text, including the Rubaiyat, Jane Eyre, the Tao Te Ching, and the Critique of Pure Reason (in German). It's fun to play with, and useful, too:

http://ungreek.toolbot.com/

Comments to Text

I've been asked by several readers if there's a way to convert Word comments (Insert > Comment) to document text. It depends on what "convert" means. If you just need to get the text of a bunch of comments, you can open the Comments pane (View > Comments), select all, copy, and then paste to a new document. Easily done.

If you want to turn comments *into* text in the document where the comments live, here's a macro that will do the job:


Sub Comments2Text()
Dim objComment As Comment
For Each objComment In ActiveDocument.Comments
objComment.Reference.InsertAfter " <" & objComment.Initial _
& ": " & objComment.Range.Text & "> "
objComment.Delete
Next
End Sub

If you don't know how to use macros like that one, you can find out here:

Before running the macro, be sure to back up your document, just in case.

As written, the macro puts the initials and text of each comment, in angle brackets, into the document text and then deletes the comment.

If you don't want to use angle brackets, you can change them to some other character or string of characters by modifying the following two lines (note that there's a space before and after the brackets, which you can omit if you like):


objComment.Reference.InsertAfter " <" & objComment.Initial _
& ": " & objComment.Range.Text & "> "

If you don't want to delete the comments, just remove this line:


objComment.Delete

If you wanted to, you could use parentheses--


objComment.Reference.InsertAfter " (" & objComment.Initial _
& ": " & objComment.Range.Text & ") "

--and then use our NoteStripper program to turn the parenthetical comments into footnotes.

You could also use our Puller program to pull items in brackets or parentheses into another file.

Finally, you could format items in angle brackets (or other delimiters) to make them stand out from text. Red would be nice. Here's how:

1. Back up your file, just in case.

2. Click Edit > Replace.

3. In the Find What box, enter this:

<*>

4. In the Replace With box, enter this:

^&

5. Click the More button if it's there.

6. With your cursor in the Replace With box, click Format > Font > Font color > red.

7. Click the OK button.

8. Put a check in the Use Wildcards box.

9. Click the Replace All button.

All of your bracketed comments should now be red.

You can learn more about searching with wildcards in my free paper, "Advanced Searching in Microsoft Word," which you can download here:

Thanks to Jenn Morris for suggesting this topic.

_________________________________________

RESOURCES

Visual Thesaurus provides a revolutionary way to see words in relation to other words. Fascinating, fun, and useful, all at the same time:

Autotext Toolbar

Microsoft Word's AutoText feature provides an easy way to store and then reuse text, graphics, fields, tables, bookmarks, and other items. For example, this newsletter includes the same "Fine Print" section every week. All I have to do is save that text as an AutoText entry, and I can easily insert it in the newsletter without retyping, copying, or pasting. Think of AutoText as your boilerplate library.

You can create, delete, and work with AutoText entries by clicking Insert > AutoText > AutoText. But the AutoText toolbar gives you quick access to AutoText entries that you use a lot. Since I work in a publishing house, I'm thinking particularly of manuscript markup tags or typesetting codes, as explained here:

http://www.topica.com/lists/editorium/read/message.html?mid=1711132842

To display the AutoText toolbar, click View > Toolbars > AutoText. You can identify the toolbar among your many others by its wide button labeled "All Entries."

HD1Now, need to insert a Heading code? Click "All Entries" on the AutoText toolbar. Then click "Heading Tags." Then click "Heading 1" to insert the Heading 1 tag. What? You don't *have* an entry for "Heading Tags"? Let's fix that right now:

1. Create a paragraph style called "Heading Tags." Strange as it may seem, Word uses the style of the text you select as the group name for AutoText entries you create.

2. Type the text you want to store as an AutoText entry--HD1, for example.

3. Apply your new "Heading Tags" style to that text.

4. Select the text.

5. On the AutoText toolbar, click the "New" button.

6. Enter a name (at least five characters) for your AutoText entry--"Heading 1," in this case.

7. Click the "OK" button.

There, you've now got a "Heading Tags" group, and within that group you've got a listing for "Heading 1." Here's how to use them:

1. On the AutoText toolbar, click "All Entries."

2. Click "Heading Tags."

3. Click "Heading 1."

Presto! "HD1" appears in your document, formatted with the style you originally gave it. That's kind of neat, because it means you can make different text levels stand out by defining the style to use a specific font or color.

If you don't *want* your code to be formatted with a style, just format your text with the Normal style before creating your AutoText entry. Your entry will then appear under "Normal" when you click "All Entries" on the AutoText toolbar.

Think this might be useful? Good!

_________________________________________

RESOURCES

MicroType provides a free typographic ruler that you can download and print on transparent film. Then you can place it over printed copy to determine font sizes, line spacing, and rule weights.

http://www.microtype.com/typometer.html

Notes to Bibliography

I'm often faced with the task of creating a bibliography for a book I'm editing, but I hate typing in all those entries from scratch. Lazy fellow that I am, I've figured out an automated way to turn parenthetical notes into bibliography entries. It's longish, but it sure beats doing it by hand. You may need to modify the procedure a bit to fit your own needs. Still, this article will give you the general idea.

Let's say we've got a document full of parenthetical notes, like this one:

(Jack M. Lyon, Total Word Domination [PocketPCPress, 2001], 121.)

The first thing we need to do is get all the notes out of there so we can turn them into bibliography entries, like this:

Lyon, Jack M. Total Word Domination. PocketPCPress, 2001.

If you need to do this with lots of documents, you'll want to look at our Puller program:

http://www.editorium.com/puller.htm

If you only need to do this with a document or two, you can use this sneaky little method:

1. *Back up your documents* in case anything goes wrong. There, you've been warned.

2. Click Tools > Replace.

3. In the Find What box, enter this:

(*)

4. With your cursor still in the Find What box, click the No Formatting button to remove any formatting that may be applied to the box.

5. In the Replace With box, enter this:

^&

6. With your cursor still in the Replace With box, click the No Formatting button to remove any formatting that may be applied to the box.

7. Click the Format button (you may have to click the More button before it's available) and then Font.

8. Under Effects, put a check in the box of an effect you *know* is not in your document. Shadow should do nicely. You'll probably want to avoid using italic or bold, which probably *are* used in your document.

9. Click the OK button. The Replace With box should now be labeled as "Shadow."

10. Put a check in the Use Wildcards checkbox.

11. Click Replace All.

All of your parenthetical notes will now be shadowed. Isn't that exciting?

Now get rid of everything in your document that's not shadowed, leaving only the parenthetical notes:

1. Click Tools > Replace.

2. Clear any text from the Find What box.

3. Click the Format button and then Font.

4. Make sure the check in the box next to Shadow is *blank*--no checkmark, either black or gray.

6. Click the OK button. The Find What box should now be labeled as "Not Shadow."

7. Clear any text from the Replace With box.

8. With your cursor still in the Replace With box, click the No Formatting button to remove the formatting applied to the box.

9. Remove the check from the Use Wildcards checkbox.

10. Click "Replace All."

Wow, the only thing left in your document is a bunch of shadowed text in parentheses. You want each note to be followed by a carriage return, so if some of them aren't, you may need to put some in:

1. Click Tools > Replace.

2. With your cursor in the Find What box, click the No Formatting button to remove the formatting applied to the box.

3. In the Find What box, enter this:

)

4. In the Replace With box, enter this:

)^p

5. Click "Replace All."

Now you may need to get rid of double returns:

1. Click Tools > Replace.

2. In the Find What box, enter this:

^p^p

3. In the Replace With box, enter this:

^p

4. Click "Replace All."

If you think all of this is too much work, you really should check out our Puller program.

What's next? Well, for starters, let's get rid of our opening and closing parentheses:

1. Delete the parenthesis at the beginning of your first note and the end of your last note.

2. In the Find What box, enter this:

)^p(

3. In the Replace With box, enter this:

^p

4. Click "Replace All."

Now let's get those names transposed:

1. Click Tools > Replace.

2. With your cursor in the Find What box, click the No Formatting button to remove any formatting that may be applied to the box.

3. In the Find What box, enter this:

,( *))

4. In the Replace With box, enter this:

^t1

5. Put a check in the Use Wildcards checkbox.

6. Click "Replace All." There should now be a tab following each name in your document. Please note that if you've got "Jr.," "Sr.," "Ph.D.," and so on with some of those names, you'll need to get the tab *after* the suffixes and make sure your commas are right. Remember that you can use Find and Replace to help you with this.

7. Click Edit > Select All to select all the text in your document.

8. Click Table > Convert > Text to Table.

9. In the dialog box that appears, make sure "Number of columns" is set to 2 and "Separate text at" is set to Tabs.

10. Click the OK button. Your notes are now in two columns, with names in the first one and the bookish stuff in the second one.

11. Use your mouse to point at the top of the first column. A little black arrow should appear, pointing down.

12. Click the left mouse button to select the column.

13. Click Edit > Copy to copy the column.

14. Create a new blank document.

15. Click Edit > Paste. The name column should now be all by itself in the new document.

16. Put your cursor somewhere in column and click Table > Select > Table to select the column.

17. Click Table > Convert > Table to Text.

18. Under "Separate text with," select "Paragraph marks" and click the OK button. You've now got a list of names *not* in a table.

19. Download and install our free NameSwapper macro:

http://www.editorium.com/freebies.htm

20. Run the macro to transpose all those names to last name first. Pretty slick, no? Don't go sorting names or deleting duplicates just yet.

21. You guessed it, click Edit > Select All to select all those transposed names.

22. Click Table > Convert > Text to Table.

23. In the dialog box that appears, make sure "Number of columns" is set to 1 and "Separate text at" is set to Paragraphs.

24. Click the OK button. Your names are now back in a column.

25. Put your cursor somewhere in the column and click Table > Select > Table to select it.

26. Click Edit > Copy to copy the column.

27. Switch back to your main document.

28. Use your mouse to point at the top of the first column. That little black arrow should appear again.

29. Click the left mouse button to select the column.

30. Click Edit > Paste Cells to replace the column with your new one full of nicely transposed names.

Wow, thirty steps! That may be a record. I sure hope I got them all right.

Now let's de-table-fy your notes:

1. Put your cursor somewhere in the table and click Table > Select > Table to select it.

2. Click Table > Convert > Table to Text.

3. Under "Separate text with," select "Other" and put some weird character in the little box. I like to use the tilde character (~), which you'll find on the upper left of your keyboard. Click the OK button to get rid of the table cells and hook your names back up with their notes.

Easy sledding from here, so I won't outline the rest of the steps in detail, but here's the basic procedure:

1. Remove the check from the Use Wildcards checkbox.

2. Find the tildes and replace them with nothing.

3. Find all occurrences of a space followed by an opening bracket ( [) and replace them with a period followed by a space (. ).

4. Get rid of the closing brackets and page numbers by doing a wildcard search for this (yes, this will work on a Macintosh)--

]*[^013]

--and replacing it with this (note the period):

.^p

5. Replace Shadow with Not Shadow.

6. Sort the notes alphabetically and get rid of duplicates, using the automated techniques explained here:

http://www.topica.com/lists/editorium/read/message.html?mid=1702467672

7. Go to the top of your document and type "Bibliography." You'll probably need to do some cleanup, but basically you're done. Now, wasn't that easier than typing all those entries by hand?

To learn more about searching with wildcards, download our free paper "Advanced Find and Replace in Microsoft Word":

http://www.editorium.com/ftp/advancedfind.zip

_________________________________________

RESOURCES

Need more help automating bibliographies and notes? You may want to look at EndNote, a Microsoft Word add-in designed specifically for that purpose:

http://www.endnote.com/enhome.asp

Editing Notes and Text Side by Side

Many of the books I edit in Word are loaded with footnotes, and I've often wished I had a way to see notes and text at the same time while scrolling through them independently. Comes the dawn! It's easy:

1. Open your footnote-laden document.

2. Make sure you're looking at the document in Normal view (View > Normal.)

3. Open your document in a new window by clicking Window > New Window. You'll now have two instances of your document open. Any change you make in one will be reflected in the other, but you can scroll through them independently.

4. Arrange and size your two windows so they're displayed on your screen side by side. (If you have our Editor's ToolKit program, click Windows > Arrange Documents to do this automatically.)

5. In one of the windows (I like the one on the right) open the Notes pane so you can see your notes (View > Footnotes).

6. Use your mouse to grab the divider bar between the Notes pane and the body text. Drag the bar to within about half an inch of the top of your Word window. (If you go too far, the Notes pane will close.) Now most of that window will be taken up by your notes.

7. Use CTRL + SHIFT + F6 to jump back and forth between the two windows while scrolling independently through them to your heart's content.

Now you can see and edit your notes and text at the same time.

You can learn more about Editor's ToolKit here:

http://www.editorium.com/14857.htm

_________________________________________

RESOURCES

Literary Machine is one of the most interesting programs I've looked at in quite a while. If you need a way to store free-form notes and ideas, retrieve them at will, and compile them into a document, Literary Machine may be just what you're looking for:

http://www.literarymachine.com

This powerful program comes in two versions: 2000 and Pro. The 2000 version is free but lacks some of the Pro features, and at $20 the Pro version is a bargain. Both versions have a fairly steep learning curve, but I'd like to share some tips that may make things easier if you're interested in trying the program.

The basic element in Literary Machine is the Item, which is simply an independent text note. Literary Machine is designed to hold lots of these. When you're planning your novel and have a plot idea, you'll create a new Item and type your idea into it. When you have another idea, you'll create another Item and type away.

But how will you find your Items again after you've put them away? Before you put them away, you'll assign one or more Concepts to each Item. Concepts are represented by words in a window on the Literary Machine desktop. Drag a Concept word to an Item, and the Item will be associated with that Concept. Drag a Concept word to the desktop, and the Items associated with the Concept will be displayed as small note cards, which you can move around at will.

The idea of associating Concepts with Items is a little difficult to understand, because it's exactly the opposite of how we usually think. Ordinarily, we think of documents as being *under* a certain category. In Literary Machine, categories (Concepts) are *associated* with documents (Items).

Another idea that's a little difficult to grasp is that Concept words and Concepts aren't really the same thing. Here's why: Let's say you have a bunch of Items that discuss cats and a bunch of other Items that discuss canaries. These Items are categorized appropriately using the separate Concepts "cats" and "canaries." Now let's say you have a single Item that discusses the *interaction* of cats with canaries. Yes, you could file it under "cats" and you could also file it under "canaries." But what if that was the *only* Item you wanted to find among a whole bunch of Items on either cats or canaries? You'd have to create a "hybrid" Concept that contained *both* words, "cats" and "canaries," and assign the new Concept to that Item. Then, when you drop the Concept word "cats" or the Concept word "canaries" on the desktop, this "hybrid" Concept will appear along with the two separate Concepts. If you then drop one of the words (it doesn't matter which) from the hybrid Concept onto the desktop, you'll get *only* the Item that discusses both cats *and* canaries. In other words, a hybrid Concept is a way to file and retrieve an Item by combining Concept words. In computer language, it's an "AND." I want to find *only* the Items that are filed under "cats" AND "canaries." The separate Concepts would find the Items filed under "cats" OR "canaries." Remember, though, that you have to *assign* the hybrid Concept to the Items you want to retrieve rather than just dropping the two separate Concept words on the desktop.

Once you've got the Items in the order you want, how can you save them in that order? That's where Projects come in. You create a Project and add your selected Items to it. Then, by dropping the Project on the desktop, you'll display the same *Items* in the same *order* that you had before. You can export a Project, or multiple Projects (think "chapters"), as a separate file (think "book"). You can arrange Projects hierarchically as folders and subfolders, and if you export a group of Projects as an HTML file, the file will include the Project names as Word Heading paragraph styles.

There's one more way to find stored Items--by using the Find function, just as you would in Microsoft Word or other programs. The Items or Concepts containing the search word will be displayed on the desktop.

The program has many other terrific features, but they'll take time and thought to master. You'll probably find, however, that the result is worth the effort.

Another thing I like about Literary Machine is that its genius (literally) creator, Gunnar Sommestad, is open to suggestions about how the program should work, and he's constantly improving it. I, for one, am planning to support his efforts. In fact, I've created a macro that will convert Word documents to Items in Literary Machine. If you're interested in having the macro, let me know:

mailto:editor [at symbol] editorium.com

Fixing All Caps in Text

The newsletter a couple of weeks ago featured a macro that would set all headings in a Word document in true title case, with articles and prepositions lowercased. But what if you have a document in which an author has typed other stuff in all caps--author names in footnotes, or book titles in body text? It would be nice to have a macro that would look for anything in all caps and turn it to title case. I've modified the macro to do just that:

'THE MACRO STARTS HERE
Sub FixAllCapsInText()
'Macro created 10/19/2003 by Jack M. Lyon
Selection.Find.ClearFormatting
With Selection.Find
.Text = "[A-Z]{2,}"
.Replacement.Text = ""
.Forward = True
.Wrap = wdFindStop
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchAllWordForms = False
.MatchSoundsLike = False
.MatchWildcards = True
End With
Selection.Find.Execute
While Selection.Find.Found = True
Selection.Range.Case = wdTitleWord
Select Case Selection.Range
Case "A", "An", "As", "At", "And", "But", _
"By", "For", "From", "In", "Into", "Of", _
"On", "Or", "Over", "The", "Through", _
"To", "Under", "Unto", "With"
wrd.Case = wdLowerCase
Case "Usa", "Nasa", "Usda", "Ibm", "Nato"
wrd.Case = wdUpperCase
End Select
Selection.MoveRight Unit:=wdCharacter, Count:=1
Selection.Find.Execute
Wend
MsgBox "Finished!", , "Fix All Caps in Text"
End Sub
'THE MACRO ENDS HERE

If you don't know how to use macros like that one, you can learn how here:

The key to the macro is this line:

.Text = "[A-Z]{2,}"

That tells Word to do a wildcard search for two or more capital letters in a row. If you like, you can make that number larger to avoid such common acronyms as USA and NASA. A better way to take care of such items, however, is to list them in the following line of the macro:

Case "Usa", "Nasa", "Usda", "Ibm", "Nato"

For more information, see the newsletter here:

http://www.topica.com/lists/editorium/read/message.html?mid=1715119894

And the Readers Write column in last week's newsletter here:

http://www.topica.com/lists/editorium/read/message.html?mid=1715197755

And if you'd like more information about wildcard searching, feel free to download my paper "Advanced Find and Replace in Microsoft Word":

http://www.editorium.com/ftp/advancedfind.zip

Thanks to Linda Northrup for suggesting this topic.

_________________________________________

READERS WRITE

Jim Pinkham pointed out that the modified macro in last week's Readers Write column had a mistake on one line:

wrd.Case = wdUpperCase End Select

That should actually be two lines, like this:

wrd.Case = wdUpperCase

End Select

If you had trouble running the macro, that's why.

Johanna Murphy wrote:

"The Title Case Headings Macro is awesome! Although I would need one where you only change one level at a time. Also, I have created other styles which are named OUT and OUTNUMBER (with only 5 levels) that we use a lot in our law firm. How can I change the macro to specify those style names?"

I responded:

To use different styles with the macro, do this:

1. Delete these two lines:

For h = 1 To 9

Next h

2. Modify this line--

myHeading$ = "Heading" + Str(h)

--to something like this:

myHeading$ = "MyStyle"

Last week William T. Buckley wrote, "This is not a huge issue, but it does come up once in a while, especially in limited-space conditions. How do I produce a circled-c 'circa' sign or symbol, not to be confused with a (c) copyright symbol?"

Clarke P Gerber responded, "I've checked several specialist texts (including Chicago Manual of Style; NY Times Manual of Style and Usage) and cannot find any authority for using a circled 'c' as an abbreviation for circa. My own regional bible--The Cambridge Australian English Style Guide--says the following: 'When spelled out in full circa is often italicised. When abbreviated as c. or ca. it is now usually set in roman.'"

Thanks to Jim, Johanna, and Clarke for their messages.

_________________________________________

RESOURCES

The Microsoft Office Assistance page has a wealth of resources for Word users, including tips, templates, demos, and quizzes:

http://office.microsoft.com/assistance/