toggle box print if value is true
 

I have a toggle box set up with the following formula

Private Sub ToggleButton10_Click()
With Me.ToggleButton10
If .Value = False Then
.ForeColor = &H0
Else
.ForeColor = &HFFFFFF
End If
End With
End Sub

Is it possible to make the toggle box print only if the value is true?
Thanks in advance for any help

toggle box print if value is true
 

Hi John,

Try:

Private Sub ToggleButton1_Click()

With Me.ToggleButton1
If .Value = False Then
.ForeColor = &H0
.PrintObject = False
Else
.ForeColor = &HFFFFFF
.PrintObject = True
End If
End With

End Sub


--

---
Regards,
Norman



"John Davies" wrote in message
...
I have a toggle box set up with the following formula

Private Sub ToggleButton10_Click()
With Me.ToggleButton10
If .Value = False Then
.ForeColor = &H0
Else
.ForeColor = &HFFFFFF
End If
End With
End Sub

Is it possible to make the toggle box print only if the value is true?
Thanks in advance for any help