All uppercase characters
 

For the following line of code:

UserVal = Application.InputBox("Symbol?", , , , , , , 2),

irrespective of what I type, when it is later retrieved, I'd like all the
characters stored in UserVal to be uppercase, not lowercase. So, if I type
"ibm," I'd prefer it to be saved as "IBM." It'll save me toggling the Caps
Lock key on and off!

My thanks in advance for any help. Brad

All uppercase characters
 

Hi Brad,

Try:

UserVal =Ucase( Application.InputBox("Symbol?", , , , , , , 2), )


---
Regards,
Norman



"Brad" wrote in message
...
For the following line of code:

UserVal = Application.InputBox("Symbol?", , , , , , , 2),

irrespective of what I type, when it is later retrieved, I'd like all the
characters stored in UserVal to be uppercase, not lowercase. So, if I type
"ibm," I'd prefer it to be saved as "IBM." It'll save me toggling the
Caps Lock key on and off!

My thanks in advance for any help. Brad

All uppercase characters
 

use the Ucase() function in your assignment statement.

StorageSpot = Ucase(input)

All uppercase characters
 

Hi Brad, i had the same problem and i solved it with the following

userVal1 = Application.InputBox("Symbol?", , , , , , , 2),
userVal = uCase(userVal1)

This will make all in userVal Caps

Hope this helps,

best regards,

Tempy

*** Sent via Developersdex http://www.developersdex.com ***