All uppercase characters

[Brad]

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

 

[Norman Jones]

Hi Brad,

Try:

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

 

[Guest]

use the Ucase() function in your assignment statement.

StorageSpot = Ucase(input)

 

[Tempy]

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