Placing macros next to view tab

[Designingsally]

I got this set of macros of with me. Is it possible to place them next to the
View bar in the menu bar.

the macro i got is attached below.
Sub comments()

Dim vFindText As Variant
Dim i As Long
vFindText = Array("Because", "Also", "Since")
For i = 0 To UBound(vFindText)
With Selection
.HomeKey wdStory
With .FInd
.ClearFormatting
.Format = False
..MatchCase = True
..MatchWholeWord = True
..MatchWildcards = False
..MatchSoundsLike = False
..MatchAllWordForms = False
Do While .Execute(findText:=vFindText(i), _
Forward:=True)
Selection.comments.Add _
Range:=Selection.Range, Text:="Please don't begin a
sentence with this word."
Loop
End With
End With
Next
end sub

 

[Graham Mayor]

See http://ribboncustomizer.com/ and/or
http://gregmaxey.mvps.org/Customize_Ribbon.htm

--
<>>< ><<> ><<> <>>< ><<> <>>< <>><<>
Graham Mayor - Word MVP


<>>< ><<> ><<> <>>< ><<> <>>< <>><<>