Try this...

Sub HideRowBasedOnCondition()
Dim nEndRw As Long, i As Long, nStart As Integer

nStart = 5
nEndRw = Cells(Rows.Count, "F").End(xlUp).Row

Application.ScreenUpdating = False

Rows(nStart & ":" & nEndRw).Hidden = True

For i = nStart To nEndRw
    If UCase(Cells(i, "F").Value) = "CONJOINT" And _
        UCase(Cells(i, "G").Value) = "ANALYSIS" Then Rows(i).Hidden = False
Next i

Application.ScreenUpdating = True

End Sub