Uskrive rapport med filter
Hej EksperterJeg har 6 felter der bliver udskriven i en rapport vi kalder dem bare [felt1]...[felt6] men hvis jeg filtere på [felt2] så kommer den med boksen (Indtast parameterværdi Lookup_Tupenr.udstyrstype)
men det er kun hvis det felt indgår i mit filter ellers virker det helt som det skal
Håber der er en der kan gennemskue mit problem
Min udskrifts kode ser sådan her ud
Private Sub Kommandoknap61_Click()
On Error GoTo Err_Kommandoknap61_Click
Dim sFilter As String
If Me.FilterOn Then
sFilter = Me.Filter
Else
sFilter = ""
End If
DoCmd.OpenReport "Måle oversigt", acNormal, , sFilter
Exit_Kommandoknap61_Click:
Exit Sub
Err_Kommandoknap61_Click:
MsgBox Err.Description
Resume Exit_Kommandoknap61_Click
End Sub