I've not worked with WORD .. however, based on the line of code you provided ... try
this :
Code:
Option Explicit
Sub ReviewSel()
If CommandBars("Reviewing").Visible = False Then
CommandBars("Reviewing").Visible = True
Else
CommandBars("Reviewing").Visible = False
End If
End Sub