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 :

Ne pas appliquer une procédure à un nouvel enregistement


Sujet :

VBA Access

  1. #1
    Membre habitué Avatar de C15nantes
    Homme Profil pro
    retraité
    Inscrit en
    Février 2011
    Messages
    379
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Loire Atlantique (Pays de la Loire)

    Informations professionnelles :
    Activité : retraité
    Secteur : Enseignement

    Informations forums :
    Inscription : Février 2011
    Messages : 379
    Points : 137
    Points
    137
    Par défaut Ne pas appliquer une procédure à un nouvel enregistement
    Bonjour à tous et à toutes,

    Je gère les adhérents d'une association principalement via un formulaire adossé à une T_Adhérents.

    J'ai un bouton "modifier" qui me permet de débloquer les contrôles.
    J'ai un bouton "valider" qui me permet de valider l'enregistrement actuel, soit après la saisie initiale, soit après une modification, puis de rebloquer les contrôles.

    A ce bouton "valider", j'ai associé une procédure "historique" qui pour le moment coince malgré l'aide soutenue que m'apporte Argy (cela fait l'objet de la discussion "Ne prendre en compte que certaines modifications dans un formulaire").

    En faisant et refaisant des tests, je viens de m'apercevoir que cette procédure, avec ses défauts actuels, s'applique aussi lorsque je valide un nouvel enregistrement (puisque j'utilise le même bouton "valider").

    Pour ne pas mélanger tous les problèmes, je fais ce post différent du précédent.

    Je vous ferai grâce de toute la procédure, je vous indique simplement le test que j'y ai mis au début pour que cela ne s'applique pas à ce nouvel enregistrement. Manifestement, cela ne fonctionne pas.

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    If Me.N°Adherent = DLast("[N°Adherent]", "[T Adhérents]") And Me.MiseAJour = Now Then
                Exit Sub
                DoCmd.RunCommand acCmdSaveRecord
                Me.Refresh
    End If
    Merci de votre aide.

    A+

    c15nantes

  2. #2
    Rédacteur/Modérateur

    Avatar de ClaudeLELOUP
    Homme Profil pro
    Chercheur de loisirs (ayant trouvé tous les jours !)
    Inscrit en
    Novembre 2006
    Messages
    20 594
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 78
    Localisation : Belgique

    Informations professionnelles :
    Activité : Chercheur de loisirs (ayant trouvé tous les jours !)
    Secteur : Finance

    Informations forums :
    Inscription : Novembre 2006
    Messages : 20 594
    Points : 281 907
    Points
    281 907
    Par défaut
    Bonjour,

    Demande plutôt si c'est un nouvel enregistrement :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
      If Me.NewRecord Then
        MsgBox "Je suis nouveau !"
      End If
     
    ' ou, si tu préfères
     
     If Not Me.NewRecord Then
        MsgBox "Je suis ancien !"
      End If

    Et bien le bonjour à Argy, si tu le croises...
    SVP ne m'envoyez pas de messages privés pour poser des questions techniques, vous n'aurez pas de réponse !

Discussions similaires

  1. Appliquer une procédure à une feuille
    Par ch0ubida dans le forum Macros et VBA Excel
    Réponses: 11
    Dernier message: 18/12/2014, 03h04
  2. Réponses: 10
    Dernier message: 14/04/2011, 12h47
  3. [PHP 5.3] Je n'arrive pas à appliquer une valeur sur une AERATEXT (PHP)
    Par beegees dans le forum Langage
    Réponses: 2
    Dernier message: 28/12/2009, 17h18
  4. [E-00] Appliquer une procédure à toutes les feuilles d'un classeur
    Par anyah dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 30/10/2008, 09h55
  5. Appliquer une procédure stockée sur le contenu d'une table
    Par teks9 dans le forum Développement
    Réponses: 5
    Dernier message: 09/09/2008, 13h40

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