fortløbende numre

jeps det er det da !!! du skal bare skrive når man åberen den der ting der skal gi 1 mere til (    = dimsen +1

=)

// www.webgud.dk/daniel/copyfree

I rapportens detaljesektion laver du en ubunden tekstboks. Sæt postkilden til =1. Herefter vil feltet tælle 1 værdi op for hver post der er i rapporten.

Og så glemte jeg en nok så vigtig detalje: I feltegenskaberne skal du i i fanen data sætte egenskaben Løbende sum til Over alle. Så virker det.

Jeg har ikke forklaret mig godt nok, det jeg spørger efter, er et fortløbende nummer, således at hver gang rapporten bliver åbnet, står der et nyt nummer på den, jeg har en stump kode der kan gøre det i word, men det virker åbenbart ikke i access

Sub Document_Open()
Dim svar As Integer

svar = ActiveDocument.BuiltInDocumentProperties("Category")
svar = svar + 1
ActiveDocument.BuiltInDocumentProperties("Category") = svar
ActiveDocument.FormFields("Tekst1").Result = svar

End Sub

Dit eget eksempel benytter nogle egenskaber, som ikke findes i Access. Der findes nogle tilsvarende i Access, som dog kræver lidt mere kode at få fat i.

I stedet kunne du bare lave en tabel, og så hente/skrive værdien hver gang rapporten ændres.

Hvis f.eks. tabellen hedder "CustomSettings" og du heri har et felt, som hedder RapportTæller, så skal du på rapportens VedÅbning lægge denne kode:

Private Sub Report_Open(Cancel As Integer)
    CurrentProject.Connection.Execute "Update CustomSettings Set RapportTæller = RapportTæller + 1"
    Me!Tæller = DFirst("RapportTæller", "CustomSettings")
End Sub


Tekstboksen på rapporten hedder "Tæller"

/Thomas

undskyld jeg reagerer så sent, travlt.
Når jeg gør som du foreslår, får jeg denne fejl:

run-time error 2448
du kan ikke tildele en værdi til dette objekt

!!!