Signature Visible

[Ielamrani]

Can Anyone tell me why this code is not working. I am trying to Make a signature Visible and others not visible in this letter (Letter -4MR).
What's wrong?
thanks in advance

ismail




Private Sub Report_Open(Cancel As Integer)



If Check63 = True Then DoCmd.OpenReport "Letter -4MR"
Reports![Letter -4MR]!PicGastright.Visible = True
Reports![Letter -4MR]!PicSetler.Visible = False
Reports![Letter -4MR]!PicZamecki.Visible = False
Reports![Letter -4MR]!PicSeyburn.Visible = False


If Check65 = True Then DoCmd.OpenReport "Letter -4MR"
Reports![Letter -4MR]!PicSeyburn.Visible = True
Reports![Letter -4MR]!PicGastright.Visible = False
Reports![Letter -4MR]!PicSetler.Visible = False
Reports![Letter -4MR]!PicZamecki.Visible = False



If Check67 = True Then DoCmd.OpenReport "Letter -4MR"
Reports![Letter -4MR]!PicZamecki.Visible = True
Reports![Letter -4MR]!PicGastright.Visible = False
Reports![Letter -4MR]!PicSetler.Visible = False
Reports![Letter -4MR]!PicSeyburn.Visible = False

If Check69 = True Then DoCmd.OpenReport "Letter -4MR"
Reports![Letter -4MR]!PicSetler.Visible = True
Reports![Letter -4MR]!PicGastright.Visible = False
Reports![Letter -4MR]!PicZamecki.Visible = False
Reports![Letter -4MR]!PicSeyburn.Visible = False


End Sub

 

[PHV]

You may try something like this:
DoCmd.OpenReport "Letter -4MR"
Reports![Letter -4MR]!PicGastright.Visible = Check63
Reports![Letter -4MR]!PicSeyburn.Visible = Check65
Reports![Letter -4MR]!PicZamecki.Visible = Check67
Reports![Letter -4MR]!PicSetler.Visible = Check69

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[Ielamrani]

I tried it but it not working. It's highliting "docmd.openreport "Letter -4MR"


* Check 63 (Dr. Smith)
* Check 65 (Dr. Johns)
* Check 67 (Dr. Mins)
* Check 69 (Dr. Stien)
what I am trying to do is whenever a user Check a check box the report "Letter -4MR" opens with the check box name visible.
if user checks check 65, letter open with Dr. Johns visible and others not visible.

I hope this is clear.
Thanks

 

[PHV]

I tried it but it not working. It's highliting "docmd.openreport "Letter -4MR"
Any error message ?

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[Ielamrani]

Yes, it highlights

DoCmd.OpenReport "Letter -4MR