| Home |
| Search |
| Today's Posts |
|
|
|
#1
Posted to microsoft.public.excel.misc
|
|||
|
|||
upper case in InputBox
What code would I use, so that when an entry in a InputBox is made (using
upper or lower case or a mix) it auto changes it to upper case. I have the following code at the moment: Sub CommandButton2_Click() ms=InputBox("Enter Name") On Error Go To makeit If ms="" Then Exit Sub Sheets(ms).Select Exit Sub makeit: Sheets("Sheet1").Copy after:=Sheet2 ActiveSheet.Name=ms End Sub Thank you -- AOU |
|
#2
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
upper case in InputBox
ms = UCase(InputBox("Enter Name"))
-- Gary's Student "AOU" wrote: What code would I use, so that when an entry in a InputBox is made (using upper or lower case or a mix) it auto changes it to upper case. I have the following code at the moment: Sub CommandButton2_Click() ms=InputBox("Enter Name") On Error Go To makeit If ms="" Then Exit Sub Sheets(ms).Select Exit Sub makeit: Sheets("Sheet1").Copy after:=Sheet2 ActiveSheet.Name=ms End Sub Thank you -- AOU |
|
#3
Posted to microsoft.public.excel.misc
|
|||
|
|||
|
upper case in InputBox
Brilliant, it works a treat
Thanks very much -- AOU "Gary''s Student" wrote: ms = UCase(InputBox("Enter Name")) -- Gary's Student "AOU" wrote: What code would I use, so that when an entry in a InputBox is made (using upper or lower case or a mix) it auto changes it to upper case. I have the following code at the moment: Sub CommandButton2_Click() ms=InputBox("Enter Name") On Error Go To makeit If ms="" Then Exit Sub Sheets(ms).Select Exit Sub makeit: Sheets("Sheet1").Copy after:=Sheet2 ActiveSheet.Name=ms End Sub Thank you -- AOU |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| How to convert Value to words?Eg.Rs.1000/- to Repees One thousand | Excel Discussion (Misc queries) | |||
| how to use spellnumber formula | Excel Worksheet Functions | |||
| I NEED HELP with the SPELLNUMBER Function | Excel Worksheet Functions | |||
| EXCEL:NUMBER TO GREEK WORDS | Excel Worksheet Functions | |||
| Conversion | Excel Worksheet Functions | |||
Hybrid Mode
