Empêcher l'ouverture d'un rapport si aucune donnée ne montre

Posté le mercredi 20 mai 2009 - 22:01 | par admin |

Nous pouvons prévenir un rapport ouvert si aucune donnée de montrer, et pour cela, nous utilisons deux formes en fonction de la version d'Access:

1 - Toutes les versions d'ACCESS
Placez le code ci-dessous dans les propriétés du rapport, «d'habilitation» l'événement

Utilisez le Enabling événement (Activer) Rapport:

Private Sub Report_Activate ()

Si DCount ("*", Me.RecordSource) = 0 Then

MsgBox "Aucun enregistrement à afficher" vbDefaultButton1, "Erreur!"

AcReport DoCmd.Close, "nom du rapport"

End If

End Sub

2 - Depuis la version 7 (accès 95) a été ajouté de l'événement si aucune donnée », alors nous pouvons urilizar le code suivant:

Private Sub Report_NoData (Cancel As Integer)

MsgBox "Pas de données dans le rapport.", VbInformation, "Erreur!"

Cancel = True

End Sub

Pour voir courir télécharger l'exemple: Empêcher rapport d'ouverture des

Flux RSS | Trackback URI

13 commentaires »

Commentaire par Michelle
2009-06-02 21:00:48

Je me demande quelle version d'Access que vous utilisez pour ouvrir les ventes du système sur ma machine, une base de données de format de message n'est pas reconnu.

Commentaire par Administrator
2009-06-03 11:01:56

Tous les exemples sont réalisés dans Access 2003. Puis-je envoyer dans un autre format avant de Access 2003 si vous voulez.

Commentaire par Thiago Santos
2009-07-31 14:24:46

Bonjour, Je fais un sous forme de tableau, cette forme il ya trois domaines dans chaque colonne avec les formules (expressaão) exemples:

Calculado1 Période - (moins) la période calculado2
(L'espace w / mis jour) (espace p / mettre la date)

Calculado3 Période - (moins) la période calculado4
(L'espace w / mis jour) (espace p / mettre la date)

Calculado5 Période - (moins) la période calculado6
(L'espace w / mis jour) (espace p / mettre la date)

après avoir fait le résultat de la différence de la date, puis il se multiplie par 30 par rapport à un mois "X", alors le résultat de l'expression dans ces colonnes se traduira par l'ajout une autre avec un champ appelé crédit, et p / apparaît résultat dans le domaine de Crediton dois remplir toutes les colonnes en tant que champs ne sont pas des datasn ou de mettre la date 00/00/0000, si je me suis levé il était déjà assez, manquant de peu ce w / mettre fin à mon travail.
Si vous pouvez m'aider merci et félicitations pour le CARL blog. Thiago
Si vous n'avez pas compris Poso envoi w / par e-mail de déjà vous remercier pour votre attention.

Commentaire par Administrator
2009-07-31 20:38:53

Vous pouvez utiliser la fonction NZ

Calculado1 Période - (moins) nz (calculado2 période)

Commentaire par Luis
2009-08-09 19:59:58

Bonjour Jose

J'ai téléchargé votre système de vente, MS a beaucoup
à DEBUG, téléchargé à la vente du système pour moi.
reconnaissants.

Commentaire par Alan
2009-08-12 17:29:22

Vous avez un exemple de fichier de la façon d'utiliser la fonction DLookup = e = DLookup

Commentaire par Dri Viaro
2009-08-13 17:44:57

Salut, j'ai appris à connaître son blog, et souhaite le bonsoir
bjsss

J'attends votre visite :)

Commentaire par Washington
2010-02-27 21:58:53

Il est super simple d'éviter un rapport ouvert

1) Ouvrez le rapport dans la conception et ouvrez les propriétés du formulaire.
2) Allez dans l'onglet Événement et sélectionnez l'absence de données
3) Cliquez sur le bouton de sélection (...)
4) Entrez le code ci-dessous

Private Sub Report_NoData (Cancel As Integer)
MsgBox ("Aucune information pour le présent rapport»)
Fin
End Sub

5) Fermez l'éditeur Visual Basic
6) Remarque qui apparaît dans l'option CAS PROCÉDURE n'existe pas de données
7) Vous pouvez exécuter votre programme.

Commentaire par Administrator
2010-04-25 18:05:39

Il ya plusieurs façons d'atteindre un but, il suffit de choisir et d'être créatif.

Commentaire par Bruce
2010-05-19 19:13:56

Vous pouvez utiliser la fonction NZ

Calculado1 Période - (moins) nz (calculado2 période)

Commentaire par Otavio Barros
2011-01-27 10:26:41

Bonjour! Vous pouvez créer un bouton sur le formulaire pour effectuer une sauvegarde de la base de données?
Grateful.

Commentaire par Andrew
2011-07-26 22:43:07

Félicitations pour le travail! Je visite votre site tous les jours ... BTW, je tiens à préciser sur le site http://www.iAulas.com.br vous y trouverez plus de 10.000 manuels à télécharger gratuitement toutes sortes de sujets, y compris l'accès polycopiés ... j'ai aidé ...

Commentaire par Jose Oliveira
2011-08-30 18:47:59

a été vraiment à la recherche de merveilleux exemples de l'accès
Merci beaucoup

Nom (requis)
Email (requis - non publié)
Site Web
Votre commentaire ( Diminution | Augmentation )
Vous pouvez utiliser <a href="" title=""> <abbr title=""> <acronym title=""> <blockquote cite=""> <b> <cite> <code> <del datetime=""> <em> <i> <Q cite=""> <strike> <strong> dans les commentaires.

Présentation

Avatar

Merci de votre visite.
Abonnez-vous à nourrir à ne pas manquer tous les messages.

Ici, en blog je vais donner des exemples de collaboration avec Microsoft Access et également poser des questions à ceux qui demandent. Plus

Voulez-vous vous abonner?

Abonnez-vous ou abonnez-vous par e-mail:
Entrez votre email:


Annonces