ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Auto Upper on certain cells. (https://www.excelbanter.com/excel-programming/357584-auto-upper-certain-cells.html)

Ctech[_129_]

Auto Upper on certain cells.
 

Hi

Is there a way to automatically set the Font to capitals, or UPPER, for
all text inserted in certain cells...


Or do I have to use an on event, macro that changes the text to UPPER
after text is inserted?


Thanks


--
Ctech


------------------------------------------------------------------------
Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745
View this thread: http://www.excelforum.com/showthread...hreadid=528142


K Dales[_2_]

Auto Upper on certain cells.
 
You could use a font that only has uppercase characters; but other than that
there is no built-in way to do it so you would need to use an event procedure
for the worksheet_change event.
--
- K Dales


"Ctech" wrote:


Hi

Is there a way to automatically set the Font to capitals, or UPPER, for
all text inserted in certain cells...


Or do I have to use an on event, macro that changes the text to UPPER
after text is inserted?


Thanks


--
Ctech


------------------------------------------------------------------------
Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745
View this thread: http://www.excelforum.com/showthread...hreadid=528142



Ron de Bruin

Auto Upper on certain cells.
 
You can do this with DataValidation maybe

Select A1
Data Validation:(choose custom)

=EXACT(A1,UPPER(A1))

You must type in Uppercase now


--
Regards Ron de Bruin
http://www.rondebruin.nl


"K Dales" wrote in message ...
You could use a font that only has uppercase characters; but other than that
there is no built-in way to do it so you would need to use an event procedure
for the worksheet_change event.
--
- K Dales


"Ctech" wrote:


Hi

Is there a way to automatically set the Font to capitals, or UPPER, for
all text inserted in certain cells...


Or do I have to use an on event, macro that changes the text to UPPER
after text is inserted?


Thanks


--
Ctech


------------------------------------------------------------------------
Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745
View this thread: http://www.excelforum.com/showthread...hreadid=528142





Ctech[_130_]

Auto Upper on certain cells.
 

That works fine... however very enoying for people to get an error
message if they don't type in UPPERCASE.


How would you do an on event macro?


--
Ctech


------------------------------------------------------------------------
Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745
View this thread: http://www.excelforum.com/showthread...hreadid=528142


Ctech[_131_]

Auto Upper on certain cells.
 

Can I have a on event on a set cells? As I want the macro to run just
when the text in 4 cells is changed... A1, G5, H3, C17


--
Ctech


------------------------------------------------------------------------
Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745
View this thread: http://www.excelforum.com/showthread...hreadid=528142


Ron de Bruin

Auto Upper on certain cells.
 
See
http://www.mvps.org/dmcritchie/excel/proper.htm
and
http://www.cpearson.com/excel/case.htm

You can try

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Application.Intersect(Range("a1,a6,b1,b6"), Target) Is Nothing Then
Target.Formula = StrConv(Target.Formula, vbUpperCase)
End If
End Sub






--
Regards Ron de Bruin
http://www.rondebruin.nl


"Ctech" wrote in message
...

Can I have a on event on a set cells? As I want the macro to run just
when the text in 4 cells is changed... A1, G5, H3, C17


--
Ctech


------------------------------------------------------------------------
Ctech's Profile: http://www.excelforum.com/member.php...o&userid=27745
View this thread: http://www.excelforum.com/showthread...hreadid=528142





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

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com