IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Access Discussion :

Boutton oui ou non [AC-2013]


Sujet :

VBA Access

  1. #1
    Membre du Club
    Homme Profil pro
    Employer
    Inscrit en
    Août 2015
    Messages
    98
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Employer
    Secteur : Santé

    Informations forums :
    Inscription : Août 2015
    Messages : 98
    Points : 58
    Points
    58
    Par défaut Boutton oui ou non
    Bonsoir,

    Voila mon code au complet
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
     
    If IsNull(Me.Modifiable149) Then
        MsgBox "Sélectionner le pavillon svp"
      Else
        Me.Texte233.Requery
        Me.Texte235.Requery
     
        If Me.ID_Pavillons <> Me.Texte235 Then
           MsgBox "Ce matricule est attribuer au pavillon : " & [Texte233]
         Else
           Exit Sub
        End If
     
    End If
    Ce code oblige l'utilisateur de modifier manuellement le champs appeler [ID_Pavillons], et le temps de modifier je perd du temps, alors je pourrais en gagner si je réalise le changement automatique avec confirmation, j'ai changer
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    MsgBox "Ce matricule est attribuer au pavillon : " & [Texte233]
    par celui-ci :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    if MsgBox ("Ce matricule est attribuer au pavillon : "& [Texte233], vbYesNo, "Confirmation") = vbNo Then
        Me.Undo
        Me.ID_Pavillons = Me.Texte235
        MsgBox "La modification du pavillon est effectuer au nom de : " & [Texte233]
    la modification du champ [ID_Pavillons] est automatique aucune différence entre Oui ou Non, c'est normal car je ne sais pas où doit-je insérer le code:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Me.ID_Pavillons = Me.Texte235
    en plus le code en gras est signaler en jaune.

    je n'est plus d'idée et je n'est pas trouver d'exemple similaire sauf pour l'enregistrement.

  2. #2
    Membre du Club
    Homme Profil pro
    Employer
    Inscrit en
    Août 2015
    Messages
    98
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Algérie

    Informations professionnelles :
    Activité : Employer
    Secteur : Santé

    Informations forums :
    Inscription : Août 2015
    Messages : 98
    Points : 58
    Points
    58
    Par défaut J'ai trouver
    Bonsoir,

    J'ai trouver ce code et ça marche a merveille
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Dim LResponse As Integer
     
    LResponse = MsgBox("Do you wish to continue?", vbYesNo, "Continue")
     
    If LResponse = vbYes Then
       {...statements...}
    Else
       {...statements...}
    End If
    Bon courage.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Appartenir oui ou non à un domaine windows
    Par liliprog dans le forum Windows Serveur
    Réponses: 2
    Dernier message: 07/12/2005, 18h02
  2. "MODALE" Oui ou Non en VBA ?
    Par samlepiratepaddy dans le forum Access
    Réponses: 3
    Dernier message: 08/11/2005, 15h08
  3. Message avec un bouton "oui" et "non"
    Par PrinceMaster77 dans le forum Général JavaScript
    Réponses: 3
    Dernier message: 26/11/2004, 16h50
  4. [Pervasive SQL]Migration oui ou non?
    Par nenex dans le forum Autres SGBD
    Réponses: 3
    Dernier message: 02/11/2004, 18h03
  5. Conception de Base de données (AutoIncrément oui ou non)
    Par matgel dans le forum Décisions SGBD
    Réponses: 4
    Dernier message: 16/04/2004, 09h47

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo