Goededag allemaal, Ik ben aardig aan het spelen met Access en kom heel ver maar loop nu vast.
In rapporten wil ik graag alleen datgeen printen wat een waarde heeft. Hiervoor gebruik ik '.visible' en dat werkt prima als de waarde is ingevuld (lees getypt) in een formulier. Echter als ik in een formulier gebruik maak van een pulldown (keuzelijst met invoervak) dan werkt .visible niet op de velden die automatisch worden ingevuld in de rapporten. Wie wat wat ik fout doe?
Prt screen vanuit het formulier
VBA code in het rapport
Private Sub Details_Format(Cancel As Integer, FormatCount As Integer)
'Onderstaande wordt niet geprint bij geen gegevens
If IsNull(Me.DragersLocatie_2) Then
Me.Bijschrift28.Visible = False
Me.DragersLocatie_2.Visible = False
Me.DragersStraat_2.Visible = False
Me.DragersPostcode_2.Visible = False
Me.DragersPlaats_2.Visible = False
Else
Me.Bijschrift28.Visible = True
Me.DragersLocatie_2.Visible = True
Me.DragersStraat_2.Visible = True
Me.DragersPostcode_2.Visible = True
Me.DragersPlaats_2.Visible = True
End If
End Sub
In rapporten wil ik graag alleen datgeen printen wat een waarde heeft. Hiervoor gebruik ik '.visible' en dat werkt prima als de waarde is ingevuld (lees getypt) in een formulier. Echter als ik in een formulier gebruik maak van een pulldown (keuzelijst met invoervak) dan werkt .visible niet op de velden die automatisch worden ingevuld in de rapporten. Wie wat wat ik fout doe?
Prt screen vanuit het formulier
VBA code in het rapport
Private Sub Details_Format(Cancel As Integer, FormatCount As Integer)
'Onderstaande wordt niet geprint bij geen gegevens
If IsNull(Me.DragersLocatie_2) Then
Me.Bijschrift28.Visible = False
Me.DragersLocatie_2.Visible = False
Me.DragersStraat_2.Visible = False
Me.DragersPostcode_2.Visible = False
Me.DragersPlaats_2.Visible = False
Else
Me.Bijschrift28.Visible = True
Me.DragersLocatie_2.Visible = True
Me.DragersStraat_2.Visible = True
Me.DragersPostcode_2.Visible = True
Me.DragersPlaats_2.Visible = True
End If
End Sub