[MS_AccessPros] Please help, VBA code

 

Access 2010, Windows 7.

What is wrong? It is not working. ItemCode is TEXT in underlying table although entered data are numbers.

 

Private Sub ItemCode_AfterUpdate()

Select Case Me.ItemCode

Case "253010417"

Me.Item = "Plastic Bag"

Me.ItemType = "Sandwich"

Me.ItemBrand = "Up&Up"

Me.PackUp = "Bag"

End Select

 

Select Case Me.ItemCode

Case "288072410"

Me.Item = "Dairy"

Me.ItemType = "Ice Cream"

Me.ItemBrand = "Market Pantry"

Me.PackUp = "Can"

End Select

 

End Sub

__._,_.___

---

Posted by: kenaf42@yahoo.com

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (1)

---

Have you tried the highest rated email app?

With 4.5 stars in iTunes, the Yahoo Mail app is the highest rated email app on the market. What are you waiting for? Now you can access all your inboxes (Gmail, Outlook, AOL and more) in one place. Never delete an email again with 1000GB of free cloud storage.

---

Visit Your Group

• New Members 1

• Privacy • Unsubscribe • Terms of Use

SPONSORED LINKS

.

__,_._,___