Menampilkan Row 1 dan Column A yang dihidden

Private Sub CommandButton1_Click()
    If Columns("A").Hidden = False Then
        Columns("A").Hidden = True
    Else
        Columns("A").Hidden = False
    End If
End Sub