Problem with a Listbox

[counihan3]

I am trying to make sure that a listbox value is selected before a macro will run, but cannot get it to work. I am trying the following code but am not having any luck.

Private Sub CommandButton2_Click()
    If IsNull(ListBox3.value) = True Then
        MsgBox "Please select the sheet that you want the information to go to"
        Exit Sub
    Else
        Call movea
    End If
End Sub

 

[whiskycan]

Not tested this myself but you could try


IF LEN(ListBox3.value) = 0 THEN
.
.
.

</pre>

 

[jindon]

change

If IsNull(ListBox3.value) = True Then

to

If ListBox3.ListIndex = -1 Then