[marios1984]

sorry που ξαναεπιστρεφω σαυτον τον κωδικα:

ο κωδικας που χρησιμοποιω ειναι:
Private Sub Εντολή4_Click()
If IsNull(combo1) Then
MsgBox "επελεξε μηνα !", vbInformation
Exit Sub
End If
DoCmd.OpenReport "MINES", acViewReport, , "[ΜΗΝΑΣ]= '" & combo1 & "'" & "[ΚΑΤΗΓΟΡΙΑ]= '" & combo3 & "'"

End Sub

μου βγαζει μηνυμα : missing operator...οπως εχετε καταλαβει ειμαι αρχαριος στην γλωσσα προγραμματισμου ...:)