Hi try this

Private Sub CommandButton1_Click()

If Range("A12").Value = "True" Then
Rows("9:9").Select
Selection.EntireRow.Hidden = True
Else
Rows("9:9").Select
Selection.EntireRow.Hidden = False
End If
End Sub

good luck

ross