It may be easiest to have an unique identify of the rows you want to hide and unhide for Group B, and so on.
But this is some code that will just look at "Question" and Toggle the Row Hidden attribute between True and False. It should help you get started and is set for the fixed range of questions. But that can be modified to look down the sheet to the last row/question as needed.
Sub UnHideGroupA()
Dim MyQuestions As Range, MyCell As Range
Set MyQuestions = Range("B5:B24")
For Each MyCell In MyQuestions
If MyCell = "Group A ?" And MyCell.EntireRow.Hidden = False Then
MyCell.EntireRow.Hidden = True
ElseIf MyCell = "Group A ?" And MyCell.EntireRow.Hidden = True Then
MyCell.EntireRow.Hidden = False
End If
Next MyCell
End Sub
Bookmarks