G
Guest
Here's what I have.
The main form is a tab view with 5 tabs: FiveTabView
The first tab has 2 subforms both of which are datasheets.
two subforms: COMMENT Datasheet
PUBLIC_CONCERN TAB1 Datasheet
I need one field, PublicConcern, on 'PUBLIC_CONCERN TAB1 Datasheet'
to be passed to the popup form.
The popup form is: CommentPopUpInputForm
with one field: CommentInputBox (unbound)
On the 'CommentPopUpInputForm.Before Insert' there is an event procedure.
Here's the code with all my tries:
Private Sub Form_BeforeInsert(Cancel As Integer)
Rem Me.CommentInputBox = Forms!FiveTabView![PUBLIC_CONCERN TAB1
Datasheet]!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView!PUBLIC_CONCERN!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]!PUBLIC_CONCERN!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet]!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet]!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet].[Form]!PublicConcern
Me.CommentInputBox = [Forms]![FiveTabView]![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet].[Form]![PublicConcern]
End Sub
The popup form appears but the value is not being passed.
If the field in the datasheet is empty, the popup form is used to enter
text.
If the field is not empty, the popup is used to edit the text.
(I initially used the Zoom box but the customer wanted a much bigger box)
I've searched the group to get where I am now (THANKS!!! to all) but have
reached a stumping point.
Any help/suggestions are greatly appreciated.
The main form is a tab view with 5 tabs: FiveTabView
The first tab has 2 subforms both of which are datasheets.
two subforms: COMMENT Datasheet
PUBLIC_CONCERN TAB1 Datasheet
I need one field, PublicConcern, on 'PUBLIC_CONCERN TAB1 Datasheet'
to be passed to the popup form.
The popup form is: CommentPopUpInputForm
with one field: CommentInputBox (unbound)
On the 'CommentPopUpInputForm.Before Insert' there is an event procedure.
Here's the code with all my tries:
Private Sub Form_BeforeInsert(Cancel As Integer)
Rem Me.CommentInputBox = Forms!FiveTabView![PUBLIC_CONCERN TAB1
Datasheet]!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView!PUBLIC_CONCERN!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]!PUBLIC_CONCERN!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet]!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet]!PublicConcern
Rem Me.CommentInputBox = Forms!FiveTabView![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet].[Form]!PublicConcern
Me.CommentInputBox = [Forms]![FiveTabView]![1. Public
Concern]![PUBLIC_CONCERN TAB1 Datasheet].[Form]![PublicConcern]
End Sub
The popup form appears but the value is not being passed.
If the field in the datasheet is empty, the popup form is used to enter
text.
If the field is not empty, the popup is used to edit the text.
(I initially used the Zoom box but the customer wanted a much bigger box)
I've searched the group to get where I am now (THANKS!!! to all) but have
reached a stumping point.
Any help/suggestions are greatly appreciated.