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 :

Déclaration Type. Module Erreur de compilatyion


Sujet :

VBA Access

  1. #1
    Membre régulier Avatar de jajoju
    Homme Profil pro
    Semi retraité
    Inscrit en
    Novembre 2016
    Messages
    169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations professionnelles :
    Activité : Semi retraité

    Informations forums :
    Inscription : Novembre 2016
    Messages : 169
    Points : 98
    Points
    98
    Par défaut Déclaration Type. Module Erreur de compilatyion
    Bonjour,
    Je suis les étapes du livre VBA Access 2013 Créez des applications.

    On me donne un module avec lequel je dois écrire une déclaration du type

    Module1:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    Option Compare Database
     
    Option Explicit
     
    '2.3.1 : Créer le type utilisateur
     
     
    Public Type Salarié
     
        Nom As String
        Prénom As String
        NumSécu As String
     
    End Type
    Ensuite un formulaire1

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    Option Compare Database
    Option Explicit
     
    '2.3.2 : Utiliser le type Salarié
     
     Private Sub cmdEnregistrer_Click()
     
       udtSalarié.Nom = txtNom.Value
       udtSalarié.Prénom = txtPrénom.Value
       udtSalarié.NumSécu = txtSécu.Value
       DoCmd.OpenForm ("Formulaire2")
     
    End Sub
    et finalement un formulaire2

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    Option Compare Database
    Option Explicit
     
    Private Sub Form_Load()
     
       lblNom.Caption = udtSalarié.Nom
       lblPrénom.Caption = udtSalarié.Prénom
       lblSécu.Caption = udtSalarié.NumSécu
    End Sub
    Le problème : Quand je clique sur Enregistrer , il y a une erreur de compilation. J'ai vérifié plusieurs fois mes écritures et je ne vois pas l'erreur. Merci
    Images attachées Images attachées   

  2. #2
    Modérateur

    Homme Profil pro
    Inscrit en
    Octobre 2005
    Messages
    15 331
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations forums :
    Inscription : Octobre 2005
    Messages : 15 331
    Points : 23 786
    Points
    23 786
    Par défaut
    Bonjour.

    J'ajouterai dans Module1

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    global udtSalarié as Salarié
    après le end type.

    Ce n'est pas la solution la plus propre mais c'est la solution qui me parait la plus simple.

    Il est recommandé de n'utiliser les variables globales qu'avec BEAUCOUP de prudence.
    Le problème des variables globales c'est que n'importe où dans l'application tu peux les modifier.
    Ceci peut conduire à des bugs pas mal vicieux et difficiles à réparer.

    A+
    Vous voulez une réponse rapide et efficace à vos questions téchniques ?
    Ne les posez pas en message privé mais dans le forum, vous bénéficiez ainsi de la compétence et de la disponibilité de tous les contributeurs.
    Et aussi regardez dans la FAQ Access et les Tutoriaux Access. C'est plein de bonnes choses.

  3. #3
    Membre régulier Avatar de jajoju
    Homme Profil pro
    Semi retraité
    Inscrit en
    Novembre 2016
    Messages
    169
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : Canada

    Informations professionnelles :
    Activité : Semi retraité

    Informations forums :
    Inscription : Novembre 2016
    Messages : 169
    Points : 98
    Points
    98
    Par défaut Erreur de compilation
    Merci, ça fonctionne maintenant !

    Je ne comprends pas pourquoi ils n'en font pas mention dans le livre VBA Assess 2013 Créez des applications.

    C'est un livre avec lequel on est supposé apprendre le VBA avec des exemples que l'on doit suivre étape par étape dans le livre ...

    et parfois ça "bogue "

    Merci encore

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

Discussions similaires

  1. [SQL Server 2000][DTS] Ignorer un type d'erreur/ voir les erreurs
    Par Anthony.Desvernois dans le forum MS SQL Server
    Réponses: 2
    Dernier message: 28/07/2007, 12h33
  2. [d2006] [déclaration de TStrings] erreur de ma part ?
    Par SergioMaster dans le forum Delphi
    Réponses: 6
    Dernier message: 14/07/2007, 09h14
  3. type "short" erreur de calcul, pourquoi ?
    Par Link_GZ dans le forum C
    Réponses: 4
    Dernier message: 04/05/2007, 13h15
  4. Installation module erreur
    Par crochepatte dans le forum Modules
    Réponses: 3
    Dernier message: 19/01/2007, 17h13
  5. try et type d'erreur à catcher.
    Par tomy29 dans le forum Delphi
    Réponses: 20
    Dernier message: 03/08/2006, 12h19

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