Open Form Code

[Bob]

I have a control button on my form ,When I click this button I want to go to
frmPrintForms that has the same HorseID number as the Record I am on
The form frmPrintFoms has the same field HorseID....Thanx for any
help....Bob

DoCmd.OpenForm "FrmPrintForms", , , "HorseID ="

 

[Graham Mandeno]

Hi Bob

You are almost there

All you need to do is add the value of the HorseID to the "HorseID = " bit.

DoCmd.OpenForm "FrmPrintForms", , , "HorseID =" & Me.HorseID

 

[Bob]

Thanks Graham but I got a compile error on Me.HorseID
I have a code on my Main menu that opens it from a drop down list
DoCmd.OpenForm "FrmPrintForms", , , "HorseID =" & Me.cbHorseRemarks
DoCmd.SelectObject acForm, "frmPrintForms"
Thanx..Bob

Hi Bob

You are almost there

All you need to do is add the value of the HorseID to the "HorseID = "
bit.

DoCmd.OpenForm "FrmPrintForms", , , "HorseID =" & Me.HorseID

--
Good Luck

Graham Mandeno [Access MVP]
Auckland, New Zealand

I have a control button on my form ,When I click this button I want to go
to frmPrintForms that has the same HorseID number as the Record I am on
The form frmPrintFoms has the same field HorseID....Thanx for any
help....Bob

DoCmd.OpenForm "FrmPrintForms", , , "HorseID ="

 

[Bob]

Got it )) DoCmd.OpenForm "frmPrintForms", , , "HorseID =" &
Me.Form.HorseID
Thanx Graham

Thanks Graham but I got a compile error on Me.HorseID
I have a code on my Main menu that opens it from a drop down list
DoCmd.OpenForm "FrmPrintForms", , , "HorseID =" & Me.cbHorseRemarks
DoCmd.SelectObject acForm, "frmPrintForms"
Thanx..Bob

Hi Bob

You are almost there

All you need to do is add the value of the HorseID to the "HorseID = "
bit.

DoCmd.OpenForm "FrmPrintForms", , , "HorseID =" & Me.HorseID

--
Good Luck

Graham Mandeno [Access MVP]
Auckland, New Zealand

I have a control button on my form ,When I click this button I want to
go to frmPrintForms that has the same HorseID number as the Record I am
on
The form frmPrintFoms has the same field HorseID....Thanx for any
help....Bob

DoCmd.OpenForm "FrmPrintForms", , , "HorseID ="