thank you graham,
i will give it a try.
--
Tracy
* * * * * * * * * *
: As this is only one Word, it will be fairly simple to change the case of
the
: following letter to lower case using a macro. The following will change
the
: case of any word that you enter in the dialog box which is followed by an
: exclamation mark and either a space, a tab, a paragraph mark or a line
: break. If there are any other possibilities they can be added. Enter the
: Word *without the exclamation mark* in the dialog box when prompted. The
: macro will insert the exclamation mark. This function uses a wildcard
search
: so the chosen Word will be case sensitive. If it is spelled with different
: cases, then you will have to search each separately
:
: Sub ChangeCaseOfNextLetter()
: Dim strFind As String
: On Error GoTo UserCancelled:
: strFind = InputBox("Enter the word to be searched for." _
: & vbCr & "Omit the exclamation mark." _
: & vbCr & vbCr & "NOTE: Search is case sensitive.", _
: "Change following letter to Upper case", "Replace this with the word")
: If strFind = "" Then GoTo UserCancelled:
: strFind = strFind & "\![ ^13^l^t]{1,}[A-Z]"
: Selection.Find.ClearFormatting
: With Selection.Find
: Do While .Execute(findText:=strFind, _
: Wrap:=wdFindContinue, Forward:=True, _
: MatchWildcards:=True) = True
: With Selection
: .MoveRight Unit:=wdCharacter, Count:=1
: .MoveLeft Unit:=wdCharacter, Count:=1, _
: Extend:=wdExtend
: .Range.Case = wdLowerCase
: End With
: Loop
: End With
: UserCancelled:
: End Sub
:
:
http://www.gmayor.com/installing_macro.htm
:
: --
: <>>< ><<> ><<> <>>< ><<> <>>< <>><<>
: Graham Mayor - Word MVP
:
: My web site
www.gmayor.com
:
: <>>< ><<> ><<> <>>< ><<> <>>< <>><<>
:
: Tracy wrote:
: > that's fine, but i am doing this at the clients request.
: > it's only one ! after one word.
: > if you saw the document, you would understand.
: >
: >
: > : >> I've learned to delete anything that has an overabundance of
: >> exclamation points.
: >>
: >> --
: >>
: >> JoAnn Paules
: >> MVP Microsoft [Publisher]
: >>
: >> ~~~~~
: >> How to ask a question
: >>
http://support.microsoft.com/KB/555375
: >>
: >>
: >>
: >>
: >> : >>> Why do you hate caps? They make prose so much more readable. Your
: >>> own question would be much more readable if you had used them.
: >>> Also, overuse of ! reduces readability. I'm not being funny here --
: >>> surely a writer hopes to be read readily!
: >>>
: >>> : >>>> hello,
: >>>>
: >>>> i am creating a document that will have a lot of ! and i do not
: >>>> want the letter after the ! to automatically be a cap.
: >>>> i've look at the auto correct options, but do not see one that
: >>>> will work. any suggestions would be greatly appreciated.
: >>>>
: >>>> thank you.
: >>>> --
: >>>>
: >>>> Tracy
: >>>> * * * * * * * * * *
:
: