Crystal Report - Correcion

El codigo correcto es:

1.- Agregar el para el nombre del reporte, el app.path, no te lo agrega.
2.- Como el codigo supongo que es numerico, quita la comilla simple ( pero si tus codigos son tipo texto, entonces dejalas).
3.- Una buena habitud, no necesaria, pero recomendable, iguala el valor de la variable
SelectItems a vacio.

Listo, este es el codigo a insertar en tu aplicacion!!

Saludos.

ReportFileName = App.Path & "ReportesNivelEducativo.rpt"
SelectItems = ""
For i = 0 To lstNivel.ListCount - 1
If lstNivel.Selected(i) = True Then
SelectItems =SelectItems & Trim(lstNivel.ItemData(i)) & ","
End If
Next i
If Len(SelectItems) > 0 Then
SelectItems = Left(SelectItems, Len(SelectItems) - 1)
End If
.SelectionFormula = "{EstudioCursado.CodEstudioCursado} IN [" & SelectItems & "]"