Replies

Hi Diana,

Native OpenOffice format is the “.sxw” format (short for Star Office Writer). See the attached screenshot.

I don’t have a copy of Word 97 handy, but here’s the wildcard (make sure “use wildcards” is checked) pattern for what you want:

“” is “match X at the end of the word

HTH.

See post 458,340 for one method to detect formatting that is inconsistent with the Style.

Hi Lou,

I’ve got FrameMaker 5.5.6 on my machine, and it’s got filters going back to Word DOS 3.0. If you’d like, you can send me the document privately and I can send you back a file after importing, then saving back out in .doc format (Frame’s also got an export filter). andrewsavikas_AT_gmail.com.

Cheers,

A slightly simpler way is to use the VBA Environ function:

MsgBox Environ("USERNAME")

Not the speediest, but it works:

Sub FindTablesAndFiguresNotInFields()
Dim doc As Document
Dim para As Paragraph
Dim wrd As Range
Set doc = ActiveDocument
For Each para In doc.Paragraphs
    With para.Range.Find
        .ClearFormatting
        .MatchCase = True
        .MatchWildcards = True
        .Text = "[TF][ableigur]{4,5}"
        If .Execute Then
            For Each wrd In para.Range.Words
                If Trim(wrd) = "Table" Or _
                   Trim(wrd) = "Figure" Then
                    If wrd.Fields.count = 0 Then
                        wrd.HighlightColorIndex = wdBrightGreen
                    End If
                End If
            Next wrd
        End If
    End With
Next para
End Sub

Word 2003 (pro) does support validation based on an arbitrary schema (W3C XML Schema), but not based on a DTD. You’d need to convert your DTD into a schema (check out http://thaiopensource.com/relaxng/trang.html%5B/url%5D for one such conversion tool).

I’m unclear what you mean by “styles” defined in the DTD. A DTD specifies semantic rules for placement of XML elements and attributes, but doesn’t include any information about how the content should be presented.

What does your XSLT stylesheet transform your XML into? Word 2003 also allows you to apply an XSLT stylesheet when saving a document.

Before getting too deep into using Word as an XML editor, I’d strongly suggest reading “Office 2003 XML” (http://”http://www.oreilly.com/catalog/officexml/) to get a firm background in how XML works in Word.

You’re not dreaming when you ask if this is possible, but it is difficult, and requires an advanced understanding of XML and its related technologies (Schemas, DTDs, XSLT, RELAX-NG, etc.).

Good luck!

It is possible to change the reviewer associated with a particular set of changes (or an individual change if you’re really adventurous) with a fairly simple RTF hack. See post 441718, or (shameless plug alert) Hack #41 in my book.

Snag-It http://www.techsmith.com/default.asp%5B/url%5D is cheap ($30-40 depending where you buy it) and is worth every penny, and is one option.

If you’re really reluctant to spend money, then I’d suggest using GhostScript/GhostView, both free. That route, you can set up your page size, etc. in Word, then print to File. Then use GhostScript to convert the resulting PostScript file into a jpeg at 72, 300, or 600 dpi.

If you want to see a sample, post a Word doc and I’ll re-post as a jpeg after converting with GhostScript.

Hi Novice,

Unfortunately, I don’t currently have access to a machine with Word 2000 on it. If I can find one, I’ll poke around a bit, but I don’t remember much in the way of Diagram-related objects in the Word 2000 object model.

That macro was indeed written for Word 2003, and won’t work in Word 2000.

My apologies that that wasn’t clear in the text; I do plan to fix that when the book reprints.

While there are some formatting protection features in Word 2003 (I don’t recall offhand if they’re in XP), they’re fairly useless. In Word 2003, the options are available from Tools->Protect Document.

Again, these restrictions are *very* easy to get around. If you truly want a rigid document, you’d probably need to explore Smart Documents and Schema-based document work, but those are only available in Word 2003, and require fairly sophisticated development work.

Personally, the way I handle style enforcement is in 3 steps: First, write some code that checks a document for added/missing styles, merely for inspection/reporting. Second, write some code that cycles through a document, identifying invalid styles and offering the user a choice of replacement styles. Third, intercept the common formatting buttons (bullets, numbering, indent, bold, italic) and apply your styles with them conditionally based on the selected text. Not foolproof, but workable.

No, mine is significantly faster than Steve’s, as it uses a less expensive test for the end-of-row condition.

Try checking the revision type:

Sub AcceptAllDeletions()
Dim rev As Revision
For Each rev In ActiveDocument.Revisions
    If rev.Type = wdRevisionDelete Then rev.Accept
Next rev
End Sub

To pick up bookmarks within hidden text, you’d probably have to un-hide the text temporarily. As for refs to page numbers, are your page numbers in the footer? You may need to wrap another For..Each loop around the one that searches for fields to search every StoryRange so it’ll pick up those page fields.

Glad to hear the basic algorithm is sound — hope you get it working to your specs.