Visual Basic (VB and VBA)

Copyright 1999-2001 Christopher Greaves. All rights reserved. Home Page and email to [email protected]

If in doubt, record a macro and inspect the entrails!

Here is an INDEX to all the procedures.

You will probably need one copy of my GLOBAL DECLARATIONS.

Public Sub udfBookMarkSnagAllTables()
' Procedure :   BookMarkSnagAllTables
' Description:  Generate a bookmark (from BOLDed text) for all tables in a document.
' Copyright: Chris Greaves Inc.
' Inputs:       Called by the user
' Returns:      None.
' Assumes:      Each table is preceded by a short item in BOLDed text.
' Side Effects: None.
' Tested:       By the calls shown below.
    Dim tbl As Table
    For Each tbl In ActiveDocument.Tables
        tbl.Select
        Call BookMarkSnagger(tbl)
    Next tbl
    Selection.HomeKey Unit:=wdStory
End Sub

We all knew nothing when we started …

Home Page and Contact Information Send email to [email protected]. This page was last updated Thursday, November 15, 2001

Visual Basic (VB and VBA)

Copyright 1999-2001 Christopher Greaves. All rights reserved. Home Page and email to [email protected]

If in doubt, record a macro and inspect the entrails!

Here is an INDEX to all the procedures.

You will probably need one copy of my GLOBAL DECLARATIONS.

Public Sub udfBookMarkSnagAllTables()
' Procedure :   BookMarkSnagAllTables
' Description:  Generate a bookmark (from BOLDed text) for all tables in a document.
' Copyright: Chris Greaves Inc.
' Inputs:       Called by the user
' Returns:      None.
' Assumes:      Each table is preceded by a short item in BOLDed text.
' Side Effects: None.
' Tested:       By the calls shown below.
    Dim tbl As Table
    For Each tbl In ActiveDocument.Tables
        tbl.Select
        Call BookMarkSnagger(tbl)
    Next tbl
    Selection.HomeKey Unit:=wdStory
End Sub

We all knew nothing when we started …

Home Page and Contact Information Send email to [email protected]. This page was last updated Thursday, November 15, 2001