Private Sub Label20_Click() With UserForm1 If .Height = 93 Then .Height = 120 Label22.Visible = True Label19.Enabled = False Label23.Visible = True Label24.Visible = True Label25.Visible = True CheckBox1.Enabled = False Else .Height = 93 Label22.Visible = False Label19.Enabled = True Label23.Visible = False Label24.Visible = False Label25.Visible = False CheckBox1.Enabled = True End If End With End Sub