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 udfShowCursor()
' Procedure :   ShowCursor
' Description:  Display information about the text cursor position.
' Copyright: Chris Greaves Inc.
' Inputs:       None.
' Returns:      None.
' Assumes:      None.
' Side Effects: None.
' Tested:       By a call from the user.
    MsgBox Selection.Information(wdFirstCharacterColumnNumber)
    MsgBox PointsToLines(Selection.Information(wdHorizontalPositionRelativeToPage))
    MsgBox PointsToLines(Selection.Information(wdFirstCharacterColumnNumber))
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 udfShowCursor()
' Procedure :   ShowCursor
' Description:  Display information about the text cursor position.
' Copyright: Chris Greaves Inc.
' Inputs:       None.
' Returns:      None.
' Assumes:      None.
' Side Effects: None.
' Tested:       By a call from the user.
    MsgBox Selection.Information(wdFirstCharacterColumnNumber)
    MsgBox PointsToLines(Selection.Information(wdHorizontalPositionRelativeToPage))
    MsgBox PointsToLines(Selection.Information(wdFirstCharacterColumnNumber))
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