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"
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"
Me.Stock = "NE"
Case Is = "Ocean PWR"
Me.Stock = "OPTT"
Case Is = "Rigel Pharmaceuticals"
Me.Stock = "RIGL"
__._,_.___
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.
SPONSORED LINKS
.
__,_._,___
Tidak ada komentar:
Posting Komentar