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

  1. #1
    Membre régulier
    Inscrit en
    juin 2005
    Messages
    249
    Détails du profil
    Informations forums :
    Inscription : juin 2005
    Messages : 249
    Points : 94
    Points
    94

    Par défaut [VBA] Ajouter, modifier des données ou lecture seul

    Bonjour, avec plusieurs formulaires il est bien sur possible de modifier ou d'ajouter des données.
    Dans cette table j'ai ajouter un champs "LIBRE" avec comme info "Oui" ou "Non"
    Si sur l'enregistrement ce champs est sur "Oui" alors on peut modifier les données par contre si c'est sur "Non" je voudrais que mon formulaire permette pas d'ajouter ou de modifier les données.

    Est ce que c'est possible ? Si oui pouvez vous m'aider ?

  2. #2
    Faw
    Faw est déconnecté
    Membre expérimenté

    Profil pro
    Inscrit en
    juin 2004
    Messages
    1 169
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juin 2004
    Messages : 1 169
    Points : 1 383
    Points
    1 383

    Par défaut

    Salut, c'est pas clair. Tu veux agir au niveau de l'enregistrement (le vérouiller) ou au niveau du formulaire? une piste pour l'enregistrement:
    http://www.developpez.net/forums/vie...hlight=enabled
    Je ne comprends rien à Access...Mais je me soigne.
    Moteur de recherche
    DAO

  3. #3
    Membre régulier
    Inscrit en
    juin 2005
    Messages
    249
    Détails du profil
    Informations forums :
    Inscription : juin 2005
    Messages : 249
    Points : 94
    Points
    94

    Par défaut

    Peut importe je m'en remet à vous....

    J'ai plusieurs formulaires qui interviennent sur cette table

  4. #4
    Faw
    Faw est déconnecté
    Membre expérimenté

    Profil pro
    Inscrit en
    juin 2004
    Messages
    1 169
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : juin 2004
    Messages : 1 169
    Points : 1 383
    Points
    1 383

    Par défaut

    Tu connais tes besoins mieux que moi
    Le plus simple reste de gérer les propriétés AllowAddition , AllowDeletions et AllowEdits du formulaire. Si cela est tributaire d'un champ de table (LIBRE),
    je suppose que tu travailles en mode form unique, autrement cette solution
    ne va pas être des plus érgonomiques.

    EDIT: sans oublier la mise en forme conditionnelle si tu as access > 97.
    En fonction de la valeur de LIBRE tu vérouilles ou pas les contrôles du form.
    Je ne comprends rien à Access...Mais je me soigne.
    Moteur de recherche
    DAO

  5. #5
    Membre régulier
    Inscrit en
    juin 2005
    Messages
    249
    Détails du profil
    Informations forums :
    Inscription : juin 2005
    Messages : 249
    Points : 94
    Points
    94

    Par défaut

    Merci c'est OK j'ai mis :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    Private Sub Form_Current()
    If Me.A_NOTER.Value = -1 Then
    Me.AllowEdits = False
    End If
    End Sub

  6. #6
    Membre régulier
    Inscrit en
    juin 2005
    Messages
    249
    Détails du profil
    Informations forums :
    Inscription : juin 2005
    Messages : 249
    Points : 94
    Points
    94

    Par défaut

    Juste une dernière chose, avec ce code on ne peut renseigner les champs, par contre peut on les vérouiller ? C'est à dire ne plus pouvoir cliquer sur une liste déroulante par exemple ?

  7. #7
    Membre éclairé Avatar de stéphane_ais2
    Profil pro
    Inscrit en
    septembre 2004
    Messages
    792
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : septembre 2004
    Messages : 792
    Points : 888
    Points
    888

    Par défaut

    Salut,
    peut on les vérouiller
    utilise pour ça
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
     
    TaListe.enabled = False
    ...

    SE
    Si le monde explose, la dernière voix audible sera celle d’un expert, disant que la chose est impossible. - P. Ustinov

  8. #8
    Membre régulier
    Inscrit en
    juin 2005
    Messages
    249
    Détails du profil
    Informations forums :
    Inscription : juin 2005
    Messages : 249
    Points : 94
    Points
    94

    Par défaut

    Il y a un code qui permet d'affecter cela à toutes les listes ?
    Et peut on vérouiller et désactiver tous les champs et sous formulaire qu'il y a dans un Onglet ?

    Merci d'avance ce serait sympa

  9. #9
    Membre éclairé Avatar de stéphane_ais2
    Profil pro
    Inscrit en
    septembre 2004
    Messages
    792
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : septembre 2004
    Messages : 792
    Points : 888
    Points
    888

    Par défaut

    Tu peux faire une boucle avec
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
    For each ....
     
    Next
    ...
    Si le monde explose, la dernière voix audible sera celle d’un expert, disant que la chose est impossible. - P. Ustinov

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

Discussions similaires

  1. Impossible d'ajouter / modifier des données avec HSQL
    Par Tom4444 dans le forum Persistance
    Réponses: 1
    Dernier message: 06/10/2011, 16h27
  2. Réponses: 2
    Dernier message: 29/08/2011, 16h27
  3. Réponses: 34
    Dernier message: 22/11/2010, 00h00
  4. Code VBA-Base de données en lecture seule
    Par @lex7020 dans le forum VBA Access
    Réponses: 1
    Dernier message: 22/11/2007, 16h12
  5. ajouter/suprimer des données dans un classeur en VBA
    Par kamGE dans le forum Macros et VBA Excel
    Réponses: 3
    Dernier message: 25/08/2007, 18h58

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