UserForm Cases Project Code-Upper,lower and Proper

UserForm Full Code

Private Sub TextBox1_Change()
Me.TextBox1.Value = Application.WorksheetFunction.Proper(Me.TextBox1.Text)
End Sub

Private Sub TextBox2_Change()
Me.TextBox2.Value = UCase(Me.TextBox2.Text)
End Sub

Private Sub TextBox3_Change()
Me.TextBox3.Value = LCase(Me.TextBox3.Text)
End Sub

SHARE THIS