A Microsoft Office (Excel, Word) forum. OfficeFrustration

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » OfficeFrustration forum » Microsoft Excel » General Discussion
Site Map Home Register Authors List Search Today's Posts Mark Forums Read  

uppercase



 
 
Thread Tools Display Modes
  #1  
Old December 26th, 2009, 05:13 AM posted to microsoft.public.excel.misc
oldLearner57
external usenet poster
 
Posts: 189
Default uppercase

hi community,

how can i force a cell entry to have the text change to Uppercase?

any guidance much appreciated

10s community


--
oldLearner57
  #2  
Old December 26th, 2009, 05:43 AM posted to microsoft.public.excel.misc
Jacob Skaria
external usenet poster
 
Posts: 5,952
Default uppercase

Select the sheet tab which you want to work with. Right click the sheet tab
and click on 'View Code'. This will launch VBE. Paste the below code to the
right blank portion. Get back to to workbook and try out.

'The below code works on cell A1. modify to suit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Application.EnableEvents = False
Target = UCase(Target)
Application.EnableEvents = True
End If
End Sub

--
Jacob


"oldLearner57" wrote:

hi community,

how can i force a cell entry to have the text change to Uppercase?

any guidance much appreciated

10s community


--
oldLearner57

  #3  
Old December 26th, 2009, 03:17 PM posted to microsoft.public.excel.misc
Otto Moehrbach[_2_]
external usenet poster
 
Posts: 716
Default uppercase

Do you want this to happen to a specific cell, or to a specific range of
cells, or to any cell in the sheet? Jacob gave you a solution for one cell.
Come back and provide more info on what you want to do. HTH Otto

"oldLearner57" wrote in message
...
hi community,

how can i force a cell entry to have the text change to Uppercase?

any guidance much appreciated

10s community


--
oldLearner57


  #4  
Old December 26th, 2009, 03:55 PM posted to microsoft.public.excel.misc
oldLearner57
external usenet poster
 
Posts: 189
Default uppercase

10s! appreciated for the replied and it works!!
how then I can change to have the effect for say, example, to the whole
column?
I tried changed the .Address to ' .Range = "A1:A1" '
but i got an error.
can assist on this??

10s again

and 10s to community as well

Wish all a Blessed Merry X'mas
--
oldLearner57


"Jacob Skaria" wrote:

Select the sheet tab which you want to work with. Right click the sheet tab
and click on 'View Code'. This will launch VBE. Paste the below code to the
right blank portion. Get back to to workbook and try out.

'The below code works on cell A1. modify to suit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Application.EnableEvents = False
Target = UCase(Target)
Application.EnableEvents = True
End If
End Sub

--
Jacob


"oldLearner57" wrote:

hi community,

how can i force a cell entry to have the text change to Uppercase?

any guidance much appreciated

10s community


--
oldLearner57

  #5  
Old December 26th, 2009, 04:30 PM posted to microsoft.public.excel.misc
Otto Moehrbach[_2_]
external usenet poster
 
Posts: 716
Default uppercase

Range("A:A") Otto

"oldLearner57" wrote in message
...
10s! appreciated for the replied and it works!!
how then I can change to have the effect for say, example, to the whole
column?
I tried changed the .Address to ' .Range = "A1:A1" '
but i got an error.
can assist on this??

10s again

and 10s to community as well

Wish all a Blessed Merry X'mas
--
oldLearner57


"Jacob Skaria" wrote:

Select the sheet tab which you want to work with. Right click the sheet
tab
and click on 'View Code'. This will launch VBE. Paste the below code to
the
right blank portion. Get back to to workbook and try out.

'The below code works on cell A1. modify to suit

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Application.EnableEvents = False
Target = UCase(Target)
Application.EnableEvents = True
End If
End Sub

--
Jacob


"oldLearner57" wrote:

hi community,

how can i force a cell entry to have the text change to Uppercase?

any guidance much appreciated

10s community


--
oldLearner57


 




Thread Tools
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Forum Jump


All times are GMT +1. The time now is 10:07 PM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 OfficeFrustration.
The comments are property of their posters.