Re: [MS_AccessPros] Re: Problem with Select Case Statement

 

Crystal, thanks for stepping in while I have been traveling.

Duane

---

From: MS_Access_Professionals@yahoogroups.com <MS_Access_Professionals@yahoogroups.com> on behalf of crystal 8 strive4peace2008@yahoo.com [MS_Access_Professionals] <MS_Access_Professionals@yahoogroups.com>
Sent: Thursday, January 17, 2019 2:13 PM
To: MS_Access_Professionals@yahoogroups.com
Subject: Re: [MS_AccessPros] Re: Problem with Select Case Statement

 

hi Giorgio,

> "Show message history"

:) great! glad you see it ~

"You wouldn't need the table or Private Sub Combo46_AfterUpdate()?"

you need the table!!!! ... just not code to update a value that can be obtained anytime. Create a table with all the stock abbreviations and names (much better than putting that into code! as Duane pointed out) -- if you just store the symbol, you can look the name up anytime. If you know the name but not the symbol, you can have a combo box that shows the names on a list and stores the symbol when you pick it -- did you watch the combo box video? Do you see how to apply this to your situation?

What is a Combo Box?
https://www.youtube.com/watch?v=2y85oDWaSh0

have an awesome day,
crystal

On 1/17/2019 11:47 AM, giorgio_rovelli wrote:

How do you keep previous messages when you reply? Oh, I get it now: select "Show message history"

---In MS_Access_Professionals@yahoogroups.com, <strive4peace2008@...> wrote :

Access 2010, Windows 7

I am adding case statements to after update of Unbound Combo Box. After first few VBA automatically keeps adding "Is" after the Case and it does not let me to delete them. See below, please help. Ken

Private Sub Combo46_AfterUpdate()
Select Case Me.Combo46
Case "American Eagle"
Me.Stock = "AEO"
Case "Broadcom Inc"
Me.Stock = "AVGO"
Case "XPERI CORPORATION"
Me.Stock = "XPER"
Case "Bank of America"
Me.Stock = "BAC"

Case Is = "Nextra Energy"
Me.Stock = "NE"
Case Is = "Ocean PWR"
Me.Stock = "OPTT"
Case Is = "Rigel Pharmaceuticals"
Me.Stock = "RIGL"

__._,_.___

---

Posted by: Duane Hookom <duanehookom@hotmail.com>

---

Reply via web post

•

Reply to sender

•

Reply to group

•

Start a New Topic

•

Messages in this topic (12)

---

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

• Privacy • Unsubscribe • Terms of Use

SPONSORED LINKS

.

__,_._,___