ExcelBanter - Capital Text

ExcelBanter (https://www.excelbanter.com/)

- Excel Discussion (Misc queries) (https://www.excelbanter.com/excel-discussion-misc-queries/)

- - Capital Text (https://www.excelbanter.com/excel-discussion-misc-queries/254530-capital-text.html)

Reza

Capital Text

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

trip_to_tokyo[_3_]

Capital Text

Hi reza.

Turn you CAPS LOCK on on your keyboard.

On my keyboard, on the left hand side, there is a key called CAPS LOCK to
the left of the letter A.

Please hit Yes if my comments have helped.

Thanks.

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Jacob Skaria

Capital Text

Hi Reza

To turn this to CAPS automatically you will need to use a VBA solution using
WorkSheet Change event.

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.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula Then Target.Value = UCase(Target.Value)
End Sub

--
Jacob

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Steve Audus, Chaucer BEC, Sheffield UK

Capital Text

You can do it easily do it, if you don't mind your value appearing in a
different cell.

Use the formal =UPPER(Cell)

There is also =Lower(Cell)

There is also =Proper(Cell)

Hope this helps.
Steve

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Reza

Capital Text

JACOB...

thanks for ur response...
its work but when i want to delete text, there error and debug....

thanks anyway...

"Jacob Skaria" wrote:

Hi Reza

To turn this to CAPS automatically you will need to use a VBA solution using
WorkSheet Change event.

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.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula Then Target.Value = UCase(Target.Value)
End Sub

--
Jacob

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Jacob Skaria

Capital Text

OK. Try with the below

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula And Target.Text < "" Then
Target.Value = UCase(Target.Value)
End If
End Sub

--
Jacob

"reza" wrote:

JACOB...

thanks for ur response...
its work but when i want to delete text, there error and debug....

thanks anyway...

"Jacob Skaria" wrote:

Hi Reza

To turn this to CAPS automatically you will need to use a VBA solution using
WorkSheet Change event.

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.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula Then Target.Value = UCase(Target.Value)
End Sub

--
Jacob

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Trekman

Capital Text

On Jan 27, 3:49*am, Jacob Skaria
wrote:
OK. Try with the below

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula And Target.Text < "" Then
Target.Value = UCase(Target.Value)
End If
End Sub

--
Jacob

"reza" wrote:
JACOB...

thanks for ur response...
its work but when i want to delete text, there error and debug....

thanks anyway...

"Jacob Skaria" wrote:

Hi Reza

To turn this to CAPS automatically you will need to use a VBA solution using
WorkSheet Change event.

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.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula Then Target.Value = UCase(Target.Value)
End Sub

--
Jacob

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Did you try formatting all cells in the range with an "all caps" font,
like COPPERPLATE GOTHIC or ENGRAVERS MT?

Reza

Capital Text

awesome...perfectly work...

thanks jacob

"Jacob Skaria" wrote:

OK. Try with the below

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula And Target.Text < "" Then
Target.Value = UCase(Target.Value)
End If
End Sub

--
Jacob

"reza" wrote:

JACOB...

thanks for ur response...
its work but when i want to delete text, there error and debug....

thanks anyway...

"Jacob Skaria" wrote:

Hi Reza

To turn this to CAPS automatically you will need to use a VBA solution using
WorkSheet Change event.

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.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula Then Target.Value = UCase(Target.Value)
End Sub

--
Jacob

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

Reza

Capital Text

Jacob...

sorry...when i input numeric there were error again...
can you fix it again, please

so many thanks

reza

"Jacob Skaria" wrote:

OK. Try with the below

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula And Target.Text < "" Then
Target.Value = UCase(Target.Value)
End If
End Sub

--
Jacob

"reza" wrote:

JACOB...

thanks for ur response...
its work but when i want to delete text, there error and debug....

thanks anyway...

"Jacob Skaria" wrote:

Hi Reza

To turn this to CAPS automatically you will need to use a VBA solution using
WorkSheet Change event.

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.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Target.HasFormula Then Target.Value = UCase(Target.Value)
End Sub

--
Jacob

"reza" wrote:

Dear All,

if i write something in cell, how to make automatically become capital/upper
text.
i.e.
in A1...if i write family...i want automatically become FAMILY in that cell...

hoping one of you can help me

thanks

regards,
reza

All times are GMT +1. The time now is 11:22 PM.