To view/hide notes and information, click the publication title.

• "Office VBA Macros you can Use Today"
  November 2005
• The book contains macros for use in every day tasks for the Office applications Excel, Word, Powerpoint, Outlook and Access. I wrote the chapter for Microsoft Word. Although the books is for "plug-and-play" macros, I built the chapter with an eye towards showing how to correctly use Word's object model. The order in which the macros are presented build on concepts presented in preceding macros, in the form of comments in the code.

Link for Amazon.com

• "Word Programmierung - Das Handbuch"
  January 2006
• This is the book I've always wanted to write, because I haven't been able to buy it. Only Microsoft Press, Germany, was willing to take a chance on it, which is why it's only available in German. Back in the days of WordBasic, we had the "Word Developer's Kit", which not only covered all the programming Help topics, but also illustrated how to actually use them to accomplish certain kinds of tasks. There was also the "Hacker's Guide" that described what things didn't work, and how to get the job done, anyway. While there are many books that present a beginner's level of VBA, very few actually discuss the object model. But none of them reach the depth and breadth of the two older books.
  My co-authors and I - all MVPs - have tried to bring some of this to those needing to automate the modern version of Word (2000 through 2003). Code samples are primarily in VBA; C# versions of key procedures are also included, to give the .NET developer a starting point.

Link for Amazon.de

• "Microsoft Word Das Profibuch"
  November 2002 (out of print)
• The concept behind this book is similar to that of the programming handbook: to present a collection of information on how to best use Word, aimed at the professional worker. It does contain lots of macro code, where the Word application provides no built-in means to accomplish a task. The book covers as many facets of Word as is possible to cram into 700 pages. Again, only MS Press, Germany, was willing to take a chance. All copies were sold, so it's now only available as a used book.

Link for Amazon.de

• Word Bookmarks
  November 1999

  • What Word bookmarks are, what they can do, how to handle them, especially using VBA. Includes code for moving to Next/Previous bookmark in a document.

• Positioning Graphics
  December 1999
  • Dealing with graphic objects in Word.

    Article notes:
    A colleague pointed out that, while the code

    ActiveDocument.Sections(1).Headers(wdHeaderFooterPrimary).Shapes.Count

    Does indeed return all the shapes in all document headers and footers, the following code will return just the shapes in the particular header/footer. In other words, referring to the exact range will pick up only the Shapes anchored in the range.

    ActiveDocument.Sections(2).Headers(wdHeaderFooterFirstPage).RANGE.Shapes.Count

    A question came up in a Word newsgroup concerning Shapes on the second or following pages of a multipage document. If one programmatically changes the RelativeVerticalPosition to be relative to the page, the Shape jumps to the top of that page rather than staying in place. Here's are two bits of code to work around the problem. The first one I have to thank MVP colleague Ibby for, this is certainly the fastest and most accurate approach:

    With Dialogs(wdDialogFormatDrawingObject)
        'Constant value = 1
        .PositionVertRel = wdRelativeVerticalPositionPage
        .Execute
    End With

    The second one calculates the current position and sets the .Top property to move the Shape back to its original position. 1) The .Top property of a Shape positioned relative to the text is the position in relation to the anchor; 2) A Shapes .Anchor property returns a range, that in turn can be used to get the .Information(wdVerticalPositionRelativeToPage). Adding these two values, we get a .Top value for repositioning the graphic.

    Sub ShapeRelToPage()
        Dim selpos As Single
        Dim anchorpos As Single
        Dim selectedShape As Word.Shape
        
        Set selectedShape = Selection.ShapeRange(1)
        If selectedShape.RelativeVerticalPosition _
            <> wdRelativeVerticalPositionPage Then
                selpos = selectedShape.Top
                anchorpos = _
                    selectedShape.Anchor.Information( _
                    wdVerticalPositionRelativeToPage)
                
                With selectedShape
                    .RelativeVerticalPosition = _
                        wdRelativeVerticalPositionPage
                    .Top = selpos + anchorpos
                End With
        End If
    End Sub

• Word Fields, Part I: Automate Word Documents with Minimal Code
  April 2000
  • How to use Word fields to automatically insert and update information in a document without using VBA or other programming code.

    Article notes:
    A reader kindly pointed out that there's a mistake in the logic used for Listing One - Create numbering sequences. The CreateStartNumDocProp procedure assumes that no custom document properties except for "StartNum" ones are present in the document. If other document properties already exist whose names do not start with "StartNum" the wrong property name could be generated. Here is slightly altered code that takes this into account.

    Function CreateStartNumDocProp(ByVal sPropName, _
                    ByVal PropValue As Long) As String
        Dim prop As Office.DocumentProperty
        
        'If no DocProperties, or none with StartNum in name
        'DocProperty name is StartNum1
        If ActiveDocument.CustomDocumentProperties.Count = 0 Then
            sPropName = "StartNum1"
        Else
            'Otherwise, increment StartNum by 1
            For Each prop In ActiveDocument.CustomDocumentProperties
                If Left(prop.Name, 8) = "StartNum" Then
                    sPropName = "StartNum" & _
                        CStr(Val(Mid(prop.Name, 9)) + 1)
                End If
            Next prop
        End If
    
        'sPropName has not been changed, no StartNum properties
        'but other custom doc properties exist in document
        If Len(sPropName) = 8 Then sPropName = "StartNum1"
    
        'Create DocProperty and set value to
        'number of selected paragraphs plus 1
        ActiveDocument.CustomDocumentProperties.Add _
            Name:=sPropName, Type:=msoPropertyTypeString, _
            Value:=CStr(PropValue + 1), LinkToContent:=False
        CreateStartNumDocProp = sPropName
    End Function

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnovba00/html/wordfieldsparti.asp

• Word Fields, Part II: Numbering Conundrums
  May 2000
  • How to use Word fields for special numbering requirements, such as relative cell references in Word tables, continuing numbering using letters as in Excel columns (AA, AB, AC instead of AA, BB, CC).

• Word Fields, Part III: Use Events to Push the Envelope
  June 2000
  • Using the WindowBeforeDoubleClick event to "hyperlink" index entries, and the SelectionChange event to have fields in Word tables update automatically.

• Mail Merge Part I: Introduction and Data Integration
  October 2000
  • The basics of mail merge, especially from a developer's viewpoint. Linking in data: tips, traps and VBA for various types of data sources. Automating the process.
  • An important tidbit of information is missing in this article: how to determine the total number of records in the datasource via VBA. Here's how to do it:

    Sub CountMergeRecs()
        Dim ds As Word.MailMergeDataSource
        
        Set ds = ActiveDocument.MailMerge.DataSource
        
        ds.ActiveRecord = wdLastRecord
        Debug.Print ds.ActiveRecord
    End Sub
    

• Mail Merge Part II: Employing Word's Field and Formatting Capabilities
  November 2000
  • Controlling formatting. Bringing in long or formatted text and graphics. Index-type headings for lists. One-to-many relationships. Separate file for each merged data record.

• Beyond Mail Merge: Alternatives to Word's Built-in Feature
  December 2000
  • Alternatives to mail merge: using VBA and ADO. Creating a user data-interface. How to place and format data in a document.
  • The printed version of the article is missing Listing 5 (VBA code in the Word document). The full code is available from the website link.

• From Word to... Getting Word Data into Access, Excel, etc.
  February 2001
  • Overview of various methods for extracting data from a Word document. Then covers Word forms and how to automate them.
  • There is an error in the text of this article. The following is incorrect: "Form fields' default behavior can be modified by the user via the Options dialog box (Tools | Options)."

    Correct is: "Form fields' default behavior can be modified by the user via the Options dialog box (accessed by either double-clicking the form field, or clicking the Options button on the Forms toolbar)."

• Word 2002 Part I: It's the little things you treasure
  May 2001
  • An overview of the new features in Word 2002.

• Word 2002 Part II: Tables Styles, Mail Merge, Document Review and more
  June 2001
  • More on Word 2002's new features.

• What Every Access Developer Needs to Know About Word
  February 2000

  • The basics of working with the Word object model to generate complexly formatted reports and other documents. Not just for Access developers!

• More on the Report from Hell
  July 2000

  • How to handle page formatting in Word, manually and programmatically: sections, header & footers, page orientation, page numbering, and other page layouting questions.

• On the Road Again
  Nov-Dec 1999

  • Things to think about when traveling with a laptop.

• Getting Started with Spreadsheets
  Jan-Feb 2000
  • Basics on setting up a spreadsheet to track data.

http://www.computorcompanion.com/LMMArticle.asp?ID=86

• Merge Spreadsheet Data into Word
  May-Jun 2000
  • Setting up a mail merge to an Excel spreadsheet

• Calculating in a Spreadsheet
  May-Jun 2000
  • How to use and create simple spreadsheet formulas

• Adjusting Microsoft Word to Fit
  Jul-Aug 2000
  • Tips for customizing the Word environment

• Integrate Excel into Word
  Sep-Oct 2000
  • How to bring Excel sheets and charts into Word. Various methods, their pros and cons. Managing linked data.

• Create an Access Query
  Jan-Feb 2001
  • How to pull data in separate Access tables together in a query to see exactly the data you need.

• Graphing Success
  Mar-Apr 2001
  • Creating a chart in MS Excel.