docmd vedr udskriv

Hvis det er en rapport, så kan du jo bare bruge VedUdskriv hændelsesproceduren....

Horus

ja men hvis du så viser(kun viser ikke printer) så vil den også køre den hændelse.  og det er skidt

EN hurtig løsning ville være at lave noget kode under hændelsesproceduren der tjekker om det er første gang proceduren køres - er det det skal den springe proceduren over, eller skal den udføre proceduren.

Opret f.eks. en Private variable som hedder bolStatus, som Boolean i rapportens generelle sektion.

Som første linie i VedUdskriv proceduren tjekker du om bolStatus = False.

Er den det, så er det første gang proceduren kører - sæt så bolStatus til True, og afbryd proceduren. Når du så udskriver rapporten så vil proceduren ikke blive afbrudt, da bolStatus er True.

Det er lidt en \"juks\" løsning, men måske kan den gå an....

Ellers skal du oprette en Public variabel et eller anden sted. Når du så vælger at udskrive udskriften skal du sætte denne variable til True, så proceduren kan udføres - hvis du derimod vil have den vist på skærmen skal variablen sættes til false, så proceduren kan springes over - dette kan du klare de knapper du evt. benytter til at udskrive rapporten........

Håber du har fået nogle idéer....

Horus

nu er jeg ikke helt ferm til vba, men hvordan søren laver man den kode så den tjekker om det er første gang eller 2.

Ved rapportens generelle modul skal du lave dette:

Private bolStatus as Boolean


VedUdskriv proceduren skal du lave dette:

If bolStatus = False then
    \'Så er det første gang proceduren køres igennem
    \'Den skal derfor bare registrere at den har kørt og så ellers afbryde

    bolStatus = True
    Exit Sub

Else
    \'Så er det anden gang proceduren køres
    \'udfør derfor det der skal laves

    [INDSÆT DIN KODE HÉR]

   
    bolStatus = False

End if

   

tak for hjælpen , jeg har også løst på en anden måde men denne her er meget bedre.
Tak endnu engang :-)