Forhindre åpning av en rapport hvis ingen data å vise
Vi kan forebygge en rapport åpen hvis ingen data å vise, og for dette bruker vi to former avhengig av hvilken versjon av Access:
1 - Alle versjoner av Access
Plasser koden nedenfor i egenskapene til den rapporten, arrangementet "Aktivere 'Choice
Bruk hendelsen Aktivere (Aktiver) Rapport:
Private Sub Report_Activate ()
Hvis DCount ("*", Me.RecordSource) = 0 Then
MsgBox "Ingen poster å vise" vbDefaultButton1, "Feil!"
AcReport DoCmd.Close, "report name"
End If
End Sub
2 - Fra versjon 7 (Access 95) ble lagt arrangementet "hvis ingen data ', så vi kan urilizar følgende kode:
Private Sub Report_NoData (Cancel As Integer)
MsgBox "Ingen data i rapporten.", VbInformation, "Feil!"
Avbryt = True
End Sub
For å se kjøre laste eksempel: Forhindre åpning rapport
Jeg lurer på hvilken versjon av Access som du bruker for å åpne systemet salg på min maskin, er en melding format database ikke gjenkjent.
Alle eksempler er laget i Access 2003. Kan jeg sende i et annet format før Access 2003 hvis du vil.
God morgen, jeg gjør en tabell skjema, dette skjemaet er det tre felt i hver kolonne med formler (expressaão) eksempler:
Calculado1 Periode - (minus) periode calculado2
(Space w / sette dato) (mellomrom p / sette dato)
Calculado3 Periode - (minus) periode calculado4
(Space w / sette dato) (mellomrom p / sette dato)
Calculado5 Periode - (minus) periode calculado6
(Space w / sette dato) (mellomrom p / sette dato)
etter at han gjør et resultat av forskjellen på dato da det multipliserer med 30, med hensyn til en månedlig "X", så resultatet av uttrykket i disse kolonnene vil resultere i å legge en annen med et felt som heter Credit, og p / vises Resultatet i feltet Crediton gotta fylle alle kolonnene som feltene ikke er av datasn eller å sette datoen 00/00/0000 hvis jeg fikk opp var det allerede nok, bare mangler denne w / avslutte mitt arbeid.
Hvis du kan hjelpe meg takk og gratulerer til bloggen Abrç. Thiago
Hvis du ikke har forstått Poso send w / deg via e-post fra allerede takk for oppmerksomheten.
Du kan bruke NZ-funksjonen
Calculado1 Periode - (minus) NZ (calculado2 periode)
Hei Jose
Jeg lastet ned salgssystem, har MS mange
å feilsøke, ned til systemet salget for meg.
takknemlig.
Du har en eksempelfil av hvordan du bruker DLookup funksjon = e = DLookup
Hei, jeg kom til å kjenne hans blogg, og ønsker god kveld
bjsss
Jeg venter på ditt besøk
Det er super enkelt å hindre en åpen rapport
1) Åpne rapporten i DESIGN og åpne skjemaet egenskapene.
2) Gå til Event-fanen og velge hvis ingen data
3) Klikk på ellipse (...)
4) Tast koden under
Private Sub Report_NoData (Cancel As Integer)
MsgBox ("Ingen informasjon for DENNE RAPPORTEN")
Slutt
End Sub
5) Lukk redaktør VISUAL BASIC
6) Merk som vises i alternativ Hendelsesprosedyre er ingen data
7) Du kan kjøre programmet.
Det er mange måter å nå et mål, bare å velge og være kreativ.
Du kan bruke NZ-funksjonen
Calculado1 Periode - (minus) NZ (calculado2 periode)
God morgen! Du kan opprette en knapp på skjemaet for å utføre en backup av databasen?
Grateful.
Gratulerer med jobben! Jeg besøker nettstedet ditt daglige ... BTW, ville jeg indikere området http://www.iAulas.com.br der vil du finne mer enn 10.000 lærebøker for gratis nedlasting alle typer fag, inkludert brosjyrer Adgang ... jeg har hjulpet ...
var egentlig ute fantastiske eksempler på tilgang
Tusen takk