The AddItem seems to work fine, but RemoveItem doesn't, yet I've used precisely the same syntax except for 'RemoveItem'
MsgBox "Booking cancelled!", vbInformation, "Booking Cancellation"
If Month(Me.Date_1) = 1 Then
ListJ.RemoveItem Me.BoI
ElseIf Month(Me.Date_1) = 2 Then
ListF.RemoveItem Me.BoI
End If
When I click the button to remove item, I get an error saying 'invalid call or procedure'
Thanks in advance.
(This is my AddItem code):
MsgBox "Booking successfully added!", vbInformation, "Booking"
If Month(Me.Date_1) = 1 Then
ListJ.AddItem Me.BoI
ElseIf Month(Me.Date_1) = 2 Then
ListF.AddItem Me.BoI
End If
MsgBox "Booking cancelled!", vbInformation, "Booking Cancellation"
If Month(Me.Date_1) = 1 Then
ListJ.RemoveItem Me.BoI
ElseIf Month(Me.Date_1) = 2 Then
ListF.RemoveItem Me.BoI
End If
When I click the button to remove item, I get an error saying 'invalid call or procedure'
Thanks in advance.

(This is my AddItem code):
MsgBox "Booking successfully added!", vbInformation, "Booking"
If Month(Me.Date_1) = 1 Then
ListJ.AddItem Me.BoI
ElseIf Month(Me.Date_1) = 2 Then
ListF.AddItem Me.BoI
End If