salut,
 
voilà j'ai un petit pb avec mon module Access
quand j'essaye de le lancer, il me balance un msg "Erreur de compilation : Type défini par l'utilisateur non défini"  
 
merci d'avance
 
_________________________________________
 
Option Compare Database 'Utilise l'ordre de la base pour les comparaisons de chaînes
 
 
Sub REMISES()
Rem Montant de la remise accordée à un client
 
Dim Remise As Integer
 
 
Dim VoyageNet As Database
Set VoyageNet = CurrentDb()
Dim Voyage As Recordset
Set Voyage = VoyageNet.OpenRecordset("Voyage" )
 
 
Voyage.MoveFirst
Do Until Voyage.EOF
 
If PRIX >= 1000 And PRIX <= 2000 Then
Remise = 5
 
Else
If PRIX >= 2001 And PRIX <= 3000 Then
Remise = 10
 
Else
If PRIX > 3001 Then
Remise = 20
 
End If
End If
 
Debug.Print ("Le Client" ) & Voyage![CODE_CLIENT]("aura une remise de :" ) & Remise("% sur son voyage" )
Voyage.MoveNext
 
Loop
Voyage.Close
VoyageNet.Close
End Sub
 
______________________________________

A quelle endroit il te met l'erreur ?
 
Tu as essayer de mettre un SQL
Set Voyage = VoyageNet.OpenRecordset("SELECT * FROM Voyage" )
au lieu de
Set Voyage = VoyageNet.OpenRecordset("Voyage" )
 
Comment tu lance ta procédure ?
 
 

Ouvre ton module en visual basic et vérifie bien que dans outils -> références tu as bien coché Microsoft DAO (3.6 je crois).