MsgBox et case à cocher

rnejmi Messages postés 3 Statut Membre -  
moiced59 Messages postés 1161 Statut Membre -
Bonjour,

Mon problème est le suivant :

J'ai un formulaire sous forme de liste qui est associé à une table (T_Demande).

Ce formulaire rappel le numéro de la demande, son libellé, sa date et permet à l'utilisateur de la clôturer définitivement (le contrôle case à cocher s'appelle ConfirmCloture).

Ce dont j'ai besoin c'est qu'au clic sur la case à cocher, un message demandant une confirmation (Oui/Non) s'affiche et, dans l'hypothèse où la personne clique sur "Oui" que l'enregistrement ne puisse plus être modifié.

J'ai essayé avec la fonction MsgBox mais sans succès pour l'instant.

Merci par avance pour votre aide.

(ma base de données est Access 2003)

2 réponses

  1. moiced59 Messages postés 1161 Statut Membre 60
     
    salut

    Un msgbox fait en partie l'affaire :

    If MsgBox("Etes...?", vbYesNo, "Confirmation") = vbYes Then
    Me.ConfirmCloture = True
    DoCmd.GoToRecord acActiveDataObject, , acNext
    Else
    Me.ConfirmCloture = False
    End If

    Voila tu as deja un bon debut apre si la personne valide et que tu veux quitter ou autre il suffit de rajouter le code

    Si besoin hesite pas
    0
    1. rnejmi Messages postés 3 Statut Membre
       
      Merci !
      Je vais tester de suite...
      0
    2. rnejmi Messages postés 3 Statut Membre
       
      :(
      Ca ne marche pas... J'obtiens le message suivant :

      Erreur de compilation:
      Utilisation incorrecte du mot clé Me

      C'est peut être lié à la nature de mon formulaire, j'utilise le format "formulaire tabulaire". J'ai donc une liste d'occurrence et n case à cocher qui doivent toute s'appeler ConfirmCloture.

      Si c'est bien le problème, y a-t-il un moyen de les isoler une à une et de ne lancer ce script VBA que pour la case effectivement cochée ?

      Merci par avance pour votre aide.
      0
  2. moiced59 Messages postés 1161 Statut Membre 60
     
    Essai de changer le nom de ta liste deroulante de ton formulaire et re essai en mettant ce nouveau nom dans le code
    0