|
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! |
Please read the DISCLAIMER.
Here is an INDEX to all the procedures.
You will probably need one copy of my GLOBAL DECLARATIONS.
Public Function intSetTitleCase(rng As Range) As Integer
' Procedure : intSetTitleCase
' Description: Gets around an apparent bug in Word97.
' By: Chris Greaves Inc.
' Inputs: RANGE of text.
' Returns: INTEGER original case setting.
' Assumes: None.
' Side Effects: None.
' Tested: By the calls from Sub TitleCase.
intSetTitleCase = rng.Case ' return the original case of the text.
rng.Case = wdLowerCase ' go to LowerCase
rng.Case = wdTitleWord ' and only then try for Title case
'Sub TESTintSetTitleCase()
' MsgBox intSetTitleCase(Selection.Range)
'End Sub
End Function
| 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 |