Referencing a Combo Box

Hi

How best to reference a combo box (CboGrn) from the parent form while in the sub form , I have tried this code below:

If (Me.CboGrn) <> Me.Parent!CboGrn.Clumn(1) Then
MsgBox " Please Check the selection is wrong try again"
Cancel = True
Exit Sub
End If
End Sub
I want to get the column 1 of the parent combo box , the code is on the form before update event, could it be this part Me.Parent!CboGrn.Clumn(1) is not correct. The error here is Me.Parent!CboGrn.Clumn(1) data part not found.

Are there any issues here to fix here??????

Regards

Chris
LVL 3
Hankwembo Christopher,FCCA,FZICA,CIA,MAAT,B.A.ScDirectorAsked:
Who is Participating?

[Product update] Infrastructure Analysis Tool is now available with Business Accounts.Learn More

x
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

Ryan ChongBusiness Systems Analyst , ex-Senior Application EngineerCommented:
Clumn

??

typo in question or in your code?

shouldn't it be as Column?
0
Pawan KumarDatabase ExpertCommented:
Ryan is correct.

Please try like this -

If (Me.CboGrn) <> Me.Parent!CboGrn.Column(1) Then

Combox box has a column property and inside that you can pass the index...

refer for more
https://msdn.microsoft.com/en-us/vba/access-vba/articles/combobox-column-property-access
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
Hankwembo Christopher,FCCA,FZICA,CIA,MAAT,B.A.ScDirectorAuthor Commented:
Yes correct typo error
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
Microsoft Access

From novice to tech pro — start learning today.