Macro to disable a button if listbox contains no data.

[Dhamo]

Hi,


Private Sub ModulesListBox_Change()

If ModulesListBox.ListIndex > 0 Then

BTN_MoveSelectedLeft.Enabled = True

Else

BTN_MoveSelectedLeft.Enabled = False

End If

End Sub


Pls help.

 

[Dhamo]

hi,


List box name: ModulesListBox

Command Button Name: BTN_MoveSelectedLeft


Could anyone of you please share the way?

 

[Krishnakumar]

Me.BTN_MoveSelectedLeft.Enabled = Me.ModulesListBox.ListCount <> 0


Kris