Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to display
as Mar, but my boss wants it to appear as capital letters.

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

You could use a font which only displays capital letters.....

or with a formula in another cell

=UPPER(TEXT(A1,"mmm"))


--
daddylonglegs
------------------------------------------------------------------------
daddylonglegs's Profile: http://www.excelforum.com/member.php...o&userid=30486
View this thread: http://www.excelforum.com/showthread...hreadid=522358

It didn't do anything.

"Josh O." wrote:

Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

Do as I said and any date such as 3/15 entered into any cell in column B
will say MAR

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

I quite like this.
Please can you tell me what to change to only have this in one cell. (say A2)

Thanking you in anticipation.
Your help is and always has been very much appreciated.
--
Big Rick


"Don Guillett" wrote:

Do as I said and any date such as 3/15 entered into any cell in column B
will say MAR

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

if target.address= "$A$2" then

--
Don Guillett
SalesAid Software

"Big Rick" wrote in message
...
I quite like this.
Please can you tell me what to change to only have this in one cell. (say
A2)

Thanking you in anticipation.
Your help is and always has been very much appreciated.
--
Big Rick


"Don Guillett" wrote:

Do as I said and any date such as 3/15 entered into any cell in column B
will say MAR

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

Thank you for replying and for quick responce.
This did work but had to change the = to <.
I must be getting better. I wouldn't of been able to work that one out a
couple of months ago.

Thank you again
--
Big Rick


"Don Guillett" wrote:

if target.address= "$A$2" then

--
Don Guillett
SalesAid Software

"Big Rick" wrote in message
...
I quite like this.
Please can you tell me what to change to only have this in one cell. (say
A2)

Thanking you in anticipation.
Your help is and always has been very much appreciated.
--
Big Rick


"Don Guillett" wrote:

Do as I said and any date such as 3/15 entered into any cell in column B
will say MAR

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it to
display
as Mar, but my boss wants it to appear as capital letters.

Glad it worked for you.

--
Don Guillett
SalesAid Software

"Big Rick" wrote in message
...
Thank you for replying and for quick responce.
This did work but had to change the = to <.
I must be getting better. I wouldn't of been able to work that one out a
couple of months ago.

Thank you again
--
Big Rick


"Don Guillett" wrote:

if target.address= "$A$2" then

--
Don Guillett
SalesAid Software

"Big Rick" wrote in message
...
I quite like this.
Please can you tell me what to change to only have this in one cell.
(say
A2)

Thanking you in anticipation.
Your help is and always has been very much appreciated.
--
Big Rick


"Don Guillett" wrote:

Do as I said and any date such as 3/15 entered into any cell in column
B
will say MAR

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there anything I need to do?

"Don Guillett" wrote:

right click sheet tabview codeinsert this

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column < 2 Then Exit Sub
Target = UCase(Format(Target, "MMM"))

End Sub

--
Don Guillett
SalesAid Software

"Josh O." wrote in message
...
Is there a way to get a number format to show capital letters?

For example, I want to display 3/14/2006 as "MAR". I can get it
to
display
as Mar, but my boss wants it to appear as capital letters.