Textbox first Letter in Caps and Rest other in Lowercase

If you want to automatically make first letter in Uppercase and rest of the characters in lowercase. No matter what case you are typing-in but it will be automatically done by Copying and Pasting the below Code under KeyPress Event of the Textbox



Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

Select Case KeyAscii
Case Asc("A") To Asc("Z")
        If InStr(1, TextBox1.Text, Chr(KeyAscii)) > 0 Or TextBox1.SelStart > 0 Then
            KeyAscii = Asc(LCase(Chr((KeyAscii.Value))))
            Else
            KeyAscii = Asc(UCase(Chr((KeyAscii.Value))))
        End If
                     
Case Asc("a") To Asc("z")
        If InStr(1, TextBox1.Text, Chr(KeyAscii)) > 0 Or TextBox1.SelStart > 0 Then
            KeyAscii = Asc(LCase(Chr((KeyAscii.Value))))
            Else
            KeyAscii = Asc(UCase(Chr((KeyAscii.Value))))
        End If
      
 Case Else
 End Select

End Sub

Read This Also:

Buy a coffee for the author

Download FREE Tools and Templates

There are many cool and useful excel tools and templates available to download for free. For most of the tools, you get the entire VBA code base too which you can look into it, play around it, and customize according to your need.

Hurray..Lets Go

Dynamic Arrays and Spill Functions in Excel: A Beginner’s Guide

Feb 9, 2024

In today's tutorial, we'll be diving into the exciting world of dynamic arrays and spill functions in Office 365 Excel. These features have revolutionized the way we work with data, providing a more flexible and efficient way to handle arrays. I am going to explain...

How to Declare a Public Variable in VBA

Feb 3, 2024

While programming in VBA sometimes you need to declare a Public Variable that can store the value throughout the program. Use of Public Variable: Let's say you have 4 different Functions in your VBA Code or Module and you have a variable that may or may not be...

How to Copy content from Word using VBA

Feb 3, 2024

As many of us want to deal with Microsoft Word Document from Excel Macro/VBA. I am going to write few articles about Word from Excel Macro. This is the first article which opens a Word Document and read the whole content of that Word Document and put it in the Active...

What is Excel Formula?

Excel Formula is one of the best feature in Microsoft Excel, which makes Excel a very very rich application. There are so many useful built-in formulas available in Excel, which makes our work easier in Excel. For all the automated work, Excel Macro is not required. There are so many automated things can be done by using simple formulas in Excel. Formulas are simple text (With a Syntax) which is entered in to the Excel Worksheet Cells. So how computer will recognize whether it is a formula or simple text? Answer is simple.. every formula in Excel starts with Equal Sign (=).

Know more

0 Comments