ListIndex viser -1
Jeg har lavet et stump kode som gennemløber nogle elementer på min formular. cboMedarbejder (se kode i udvalg nedenfor) er en liste hvor der kan vælges flere items.Når man vælger et Area og et Shift, filtreres listen cboMedarbejder. Herefter vælger man en medarbejder på listen og i 2 dropdown bokse hhv. startdato og slutdato.
Problemet er at hvis jeg f.eks. vælger 3 medarbejdere på listen og dernæst en start og slutdato og klikker på Generer rapport knappen, vil værdien af ListIndex for cboMedarbejder være -1! :(
If Me.cboArea.ListIndex = -1 Then
MsgBox "You have not selected an area.", vbInformation
Exit Sub
ElseIf Me.cboShift.ListIndex = -1 Then
MsgBox "You have not selected a shift.", vbInformation
Exit Sub
ElseIf Me.cboMedarbejder.ListIndex = -1 Then
MsgBox "You have not selected any workers. Select atleast one worker.", vbInformation
Exit Sub
ElseIf Me.cboStartDate.ListIndex = -1 Then
MsgBox "You have not selected a start date.", vbInformation
Exit Sub
ElseIf Me.cboEndDate.ListIndex = -1 Then
MsgBox "You have not selected an end date", vbInformation
Exit Sub
End If
