VBA: Fonction d'Appel de Sous

Private Function DisplayReport()
    DoCmd.OpenReport List0, acViewNormal
End Function

Private Sub Command3_Click()

End Sub

Je suis à essayer de comprendre comment appeler DisplayReport() lorsque Command3 est cliqué
(C'est dans Access 2010).

J'espère que cela va ouvrir le rapport actuellement sélectionné dans List0 (une zone de liste). Est-ce la bonne façon de le faire?

EDIT: je crois que je comprends à la lecture de quelque part d'autre que c'est un "Emplacement de Confiance" de l'émission? Qu'est-ce que cela signifie et comment puis-je résoudre ce problème?

InformationsquelleAutor Juicy | 2013-04-07
  1. 1

    Votre Sub Command3_Click contient pas d'instructions exécutables. Essayez

    Private Sub Command3_Click()
    DisplayReport
End Sub

    Vérifiez également que le On Click propriété d'événement du bouton est associé à un gestionnaire. Si la ligne est vide, cliquez sur le bouton points de suspension [...] et choisissez "Générateur de Code".

    VBA: Fonction d'Appel de Sous

    Modifier

    Si vous avez effectué ces changements et l'événement n'est toujours pas le feu, puis fermez et ré-ouvrez la base de données. Si vous voyez un message d'avertissement en haut de la fenêtre d'Accès qui dit...

    Avertissement de sécurité du contenu actif a été désactivé. Cliquez pour plus de détails.

    ...alors assurez-vous de cliquer sur "Activer le Contenu" bouton.

    • Malheureusement, c'est exactement comment je l'ai encore rien ne se passe. J'ai essayé quelque chose de plus simple et cela ne fonctionne pas. 1) j'ai créé un nouveau formulaire 2) j'ai ajouté un bouton 3) Sur l'événement de Clic, j'ai sélectionné Générateur de Code 4) Ajouté MsgBox "Bonjour" 5) Enregistré, est allé à la vue de Forme et cliquez sur le bouton, rien ne se passe Il y a évidemment quelque chose que je ne suis pas ici...
    • C'est étrange. Créer une nouvelle base de données vide et essayez même pas. Si cela fonctionne dans la nouvelle base de données de votre base de données existante peut avoir besoin d'un /decompile.
    • J'ai mis à jour ma réponse re: [onu]les documents approuvés".
    InformationsquelleAutor Gord Thompson
  2. 0

    Avez-vous essayé ?

    Call DisplayReport
    • Oui, je l'ai fait mais il ne fait rien quand je clique sur Command3. Même si j'ajoute MsgBox "DEBUG" dans le DisplayReport fonction, rien ne se passe.
    • Avez-vous mis Command3 de Click propriété [Event Procedure]? Juste en ajoutant Command3_Click n'est pas assez...
    • Oui il est réglé sur [Procédure événementielle]. J'ai cliqué sur les "..." pour ajouter cet
    • Mon code doit être appelés à partir de votre gestionnaire de Command3_Click() de cours.
    InformationsquelleAutor Harkonnen
  3. 0
    1. Vous prétendez DisplayReport être une fonction, mais en fait elle ne retourne rien
    2. Donc, de le modifier dans un Sous:
     Privé Sous DisplayReports 
DoCmd.OpenReport List0, acViewNormal 
End Sub

    Donc l'appeler à partir du gestionnaire de clic:

     Privé Sous Command3_Click() 
appel DisplayReport 
End Sub
    InformationsquelleAutor Alberto De Caro
  4. 0

    Ok, c'est un problème que j'ai avec Access 2010. Le problème est que ma base de données n'a pas été approuvé. J'ai réussi à changer ce paramètre et maintenant, le code fonctionne très bien.

    InformationsquelleAutor Juicy