Rapport udelukkende med informationer fra VBA?

Uden at have tænkt videre over det kan du så ikke lade din kode skrive til en tabel og så lave din raport udfra den tabel.

Jo - det har jeg også overvejet - men ville helst undgå det :-)

what is wrong with having a TEMP table for this? You can obviously create a table in your VBA code and then when your finished delete it again, but all that takes time. So why not use  same table?

Det er helt korrekt - det er ikke noget problem at lave det og evt. lave en midlertidig tabel, skrive det i (for så efterfølgende at slette det igen). Jeg skriver ikke ned til nogen tabel - bruger det udelukkende i formularer.

Det er lige så meget fordi jeg ikke synes det er en særlig praktisk løsning (vi har alle vores særheder ;-)

Men jeg har desuden også fundet det jeg søgte (www.mvps.org\access):

In the Open event of the report:

Private Sub Report_Open(Cancel As Integer)
  Me.RecordSource = grst.Name
End Sub

In a standard module:

'
' This code was originally written by Andy Baron
' It is not to be altered or distributed,
' except as part of an application.
' You are free to use it in any application,
' provided the copyright notice is left unchanged.
'
' Code Courtesy of
' Andy Baron
'
Public grst As Recordset

Public Sub testreport()
  Set grst = CurrentDb.OpenRecordset( _
        "Select * from tblTest1 where longfield=4")
  DoCmd.OpenReport "rptTest1", acViewPreview 
  grst.Close 
  Set grst = Nothing
End Sub

Nå - tak for hjælpen anyway

isnt there table involved here?

jo/nej - jeg ved ikke om vi skriver forbi hinanden (eller jeg faktisk ikke har gennemarbejdet, den kode jeg fandt!)....

Som jeg umiddelbart forstår (og vil bruge koden), så erstatter jeg "Select * from tblTest1" med de beregninger jeg laver i koden og på den måde undgår jeg brug af tabeller! Viser det sig at jeg har taget fejl, er jeg ikke bleg for at indrømme det og fører dermed gerne pointene "tilbage" og tildeler dem til jer..

I hører nærmere!

Public grst As Recordset
This declares a variable with type recordset

Set grst = CurrentDb.OpenRecordset( _
        "Select * from tblTest1 where longfield=4")

This line open a recorset which will contain fields which are from then table tblTest1 and then grst points at this recordset.
Sothe recordset now has a number of known fields with known types and is filled with data.

I may be wrong, but I dont see how your going to get your calculated fields into a recordset which you dont know the layout of.

Hav eyou tried it? If so I would lik eto see ho wyou do it, we can maybe learn something.

Ok - jeg var lidt for hurtig. Man kan gøre det på en sql-database, men ikke umiddelbart i Access. Undskyld at jeg var så hurtig på aftrækkeren :-(

Jeg har oprettet et spørgsmål, hvor I kan afgive et svar og få pointene...

http://www.eksperten.dk/spm/729479