Weet niet wat ik fout doe

[jvrooij]

Ik heb een wachtverslag gemaakt en mensen willen soms daar ook een hardcopy van dus ze moeten ook kunnen printen. Omdat ze niet te moeilijk willen doen zit er alleen een knop om te printen en dan is het de bedoeling dat hij alleen die record op een raport afdrukt.

Nu lukt dat in een ander wachtverslag van een andre afdeling perfect maar ik krijg ik de fout melding : "Variable not defined"e n maakt hij de bovenste regel geel en makeerd "acView" blauw

Dit is de code die ik gebruik

Private Sub print_TP_wachtverslag_Click()
Me.Form.Refresh

Dim stDocName As String, sFilter As String
Dim iRecord As Integer
iRecord = Me.TP_WachtverslagId.Value
stDocName = "TP_report_wachtverslag"
sFilter = "[TP_WachtverslagId]= " & iRecord
DoCmd.OpenReport stDocName, acViewPrint, , sFilter
End Sub


Ik heb geen idee wat er fout is

 

[OctaFish]

Als je deze melding krijgt, heb je waarschijnlijk de regel Option Explicit in het algemene deel van de procedurepagina staan. Die zou je eens uit kunnen zetten door er een quootje voor te zetten. Waarom begin je overigens met een Refresh?

 

[jvrooij]

Als je deze melding krijgt, heb je waarschijnlijk de regel Option Explicit in het algemene deel van de procedurepagina staan. Die zou je eens uit kunnen zetten door er een quootje voor te zetten. Waarom begin je overigens met een Refresh?

Yep, gewoon helemaal overheen gekeken.

bedankt