software

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

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

right click sheet tabgt;view codegt;insert thisgt;

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column lt;gt; 2 Then Exit Sub
Target = UCase(Format(Target, quot;MMMquot;))

End Sub

--
Don Guillett
SalesAid Software

quot;Josh O.quot; gt; wrote in message
...
gt; Is there a way to get a number format to show capital letters?
gt;
gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt; display
gt; as Mar, but my boss wants it to appear as capital letters.
Is there anything I need to do?

quot;Don Guillettquot; wrote:

gt; right click sheet tabgt;view codegt;insert thisgt;
gt;
gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; If Target.Column lt;gt; 2 Then Exit Sub
gt; Target = UCase(Format(Target, quot;MMMquot;))
gt;
gt; End Sub
gt;
gt; --
gt; Don Guillett
gt; SalesAid Software
gt;
gt; quot;Josh O.quot; gt; wrote in message
gt; ...
gt; gt; Is there a way to get a number format to show capital letters?
gt; gt;
gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt; gt; display
gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt;
gt;
gt;


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

or with a formula in another cell

=UPPER(TEXT(A1,quot;mmmquot;))--
daddylonglegs
------------------------------------------------------------------------
daddylonglegs's Profile: www.excelforum.com/member.php...oamp;userid=30486
View this thread: www.excelforum.com/showthread...hreadid=522358It didn't do anything.

quot;Josh O.quot; wrote:

gt; Is there anything I need to do?
gt;
gt; quot;Don Guillettquot; wrote:
gt;
gt; gt; right click sheet tabgt;view codegt;insert thisgt;
gt; gt;
gt; gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt; If Target.Column lt;gt; 2 Then Exit Sub
gt; gt; Target = UCase(Format(Target, quot;MMMquot;))
gt; gt;
gt; gt; End Sub
gt; gt;
gt; gt; --
gt; gt; Don Guillett
gt; gt; SalesAid Software
gt; gt;
gt; gt; quot;Josh O.quot; gt; wrote in message
gt; gt; ...
gt; gt; gt; Is there a way to get a number format to show capital letters?
gt; gt; gt;
gt; gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt; gt; gt; display
gt; gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt; gt;
gt; gt;
gt; gt;

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

quot;Josh O.quot; gt; wrote in message
...
gt; Is there anything I need to do?
gt;
gt; quot;Don Guillettquot; wrote:
gt;
gt;gt; right click sheet tabgt;view codegt;insert thisgt;
gt;gt;
gt;gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt;gt; If Target.Column lt;gt; 2 Then Exit Sub
gt;gt; Target = UCase(Format(Target, quot;MMMquot;))
gt;gt;
gt;gt; End Sub
gt;gt;
gt;gt; --
gt;gt; Don Guillett
gt;gt; SalesAid Software
gt;gt;
gt;gt; quot;Josh O.quot; gt; wrote in message
gt;gt; ...
gt;gt; gt; Is there a way to get a number format to show capital letters?
gt;gt; gt;
gt;gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt;gt; gt; display
gt;gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt;gt;
gt;gt;
gt;gt;
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 Rickquot;Don Guillettquot; wrote:

gt; Do as I said and any date such as 3/15 entered into any cell in column B
gt; will say MAR
gt;
gt; --
gt; Don Guillett
gt; SalesAid Software
gt;
gt; quot;Josh O.quot; gt; wrote in message
gt; ...
gt; gt; Is there anything I need to do?
gt; gt;
gt; gt; quot;Don Guillettquot; wrote:
gt; gt;
gt; gt;gt; right click sheet tabgt;view codegt;insert thisgt;
gt; gt;gt;
gt; gt;gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt;gt; If Target.Column lt;gt; 2 Then Exit Sub
gt; gt;gt; Target = UCase(Format(Target, quot;MMMquot;))
gt; gt;gt;
gt; gt;gt; End Sub
gt; gt;gt;
gt; gt;gt; --
gt; gt;gt; Don Guillett
gt; gt;gt; SalesAid Software
gt; gt;gt;
gt; gt;gt; quot;Josh O.quot; gt; wrote in message
gt; gt;gt; ...
gt; gt;gt; gt; Is there a way to get a number format to show capital letters?
gt; gt;gt; gt;
gt; gt;gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt; gt;gt; gt; display
gt; gt;gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt; gt;gt;
gt; gt;gt;
gt; gt;gt;
gt;
gt;
gt;

if target.address= quot;$A$2quot; then

--
Don Guillett
SalesAid Software

quot;Big Rickquot; gt; wrote in message
...
gt;I quite like this.
gt; Please can you tell me what to change to only have this in one cell. (say
gt; A2)
gt;
gt; Thanking you in anticipation.
gt; Your help is and always has been very much appreciated.
gt; --
gt; Big Rick
gt;
gt;
gt; quot;Don Guillettquot; wrote:
gt;
gt;gt; Do as I said and any date such as 3/15 entered into any cell in column B
gt;gt; will say MAR
gt;gt;
gt;gt; --
gt;gt; Don Guillett
gt;gt; SalesAid Software
gt;gt;
gt;gt; quot;Josh O.quot; gt; wrote in message
gt;gt; ...
gt;gt; gt; Is there anything I need to do?
gt;gt; gt;
gt;gt; gt; quot;Don Guillettquot; wrote:
gt;gt; gt;
gt;gt; gt;gt; right click sheet tabgt;view codegt;insert thisgt;
gt;gt; gt;gt;
gt;gt; gt;gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt;gt; gt;gt; If Target.Column lt;gt; 2 Then Exit Sub
gt;gt; gt;gt; Target = UCase(Format(Target, quot;MMMquot;))
gt;gt; gt;gt;
gt;gt; gt;gt; End Sub
gt;gt; gt;gt;
gt;gt; gt;gt; --
gt;gt; gt;gt; Don Guillett
gt;gt; gt;gt; SalesAid Software
gt;gt; gt;gt;
gt;gt; gt;gt; quot;Josh O.quot; gt; wrote in message
gt;gt; gt;gt; ...
gt;gt; gt;gt; gt; Is there a way to get a number format to show capital letters?
gt;gt; gt;gt; gt;
gt;gt; gt;gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt;gt; gt;gt; gt; display
gt;gt; gt;gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt;gt; gt;gt;
gt;gt; gt;gt;
gt;gt; gt;gt;
gt;gt;
gt;gt;
gt;gt;
Thank you for replying and for quick responce.
This did work but had to change the = to lt;gt;.
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 Rickquot;Don Guillettquot; wrote:

gt; if target.address= quot;$A$2quot; then
gt;
gt; --
gt; Don Guillett
gt; SalesAid Software
gt;
gt; quot;Big Rickquot; gt; wrote in message
gt; ...
gt; gt;I quite like this.
gt; gt; Please can you tell me what to change to only have this in one cell. (say
gt; gt; A2)
gt; gt;
gt; gt; Thanking you in anticipation.
gt; gt; Your help is and always has been very much appreciated.
gt; gt; --
gt; gt; Big Rick
gt; gt;
gt; gt;
gt; gt; quot;Don Guillettquot; wrote:
gt; gt;
gt; gt;gt; Do as I said and any date such as 3/15 entered into any cell in column B
gt; gt;gt; will say MAR
gt; gt;gt;
gt; gt;gt; --
gt; gt;gt; Don Guillett
gt; gt;gt; SalesAid Software
gt; gt;gt;
gt; gt;gt; quot;Josh O.quot; gt; wrote in message
gt; gt;gt; ...
gt; gt;gt; gt; Is there anything I need to do?
gt; gt;gt; gt;
gt; gt;gt; gt; quot;Don Guillettquot; wrote:
gt; gt;gt; gt;
gt; gt;gt; gt;gt; right click sheet tabgt;view codegt;insert thisgt;
gt; gt;gt; gt;gt;
gt; gt;gt; gt;gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt; gt;gt; gt;gt; If Target.Column lt;gt; 2 Then Exit Sub
gt; gt;gt; gt;gt; Target = UCase(Format(Target, quot;MMMquot;))
gt; gt;gt; gt;gt;
gt; gt;gt; gt;gt; End Sub
gt; gt;gt; gt;gt;
gt; gt;gt; gt;gt; --
gt; gt;gt; gt;gt; Don Guillett
gt; gt;gt; gt;gt; SalesAid Software
gt; gt;gt; gt;gt;
gt; gt;gt; gt;gt; quot;Josh O.quot; gt; wrote in message
gt; gt;gt; gt;gt; ...
gt; gt;gt; gt;gt; gt; Is there a way to get a number format to show capital letters?
gt; gt;gt; gt;gt; gt;
gt; gt;gt; gt;gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it to
gt; gt;gt; gt;gt; gt; display
gt; gt;gt; gt;gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt; gt;gt; gt;gt;
gt; gt;gt; gt;gt;
gt; gt;gt; gt;gt;
gt; gt;gt;
gt; gt;gt;
gt; gt;gt;
gt;
gt;
gt;

Glad it worked for you.

--
Don Guillett
SalesAid Software

quot;Big Rickquot; gt; wrote in message
...
gt; Thank you for replying and for quick responce.
gt; This did work but had to change the = to lt;gt;.
gt; I must be getting better. I wouldn't of been able to work that one out a
gt; couple of months ago.
gt;
gt; Thank you again
gt; --
gt; Big Rick
gt;
gt;
gt; quot;Don Guillettquot; wrote:
gt;
gt;gt; if target.address= quot;$A$2quot; then
gt;gt;
gt;gt; --
gt;gt; Don Guillett
gt;gt; SalesAid Software
gt;gt;
gt;gt; quot;Big Rickquot; gt; wrote in message
gt;gt; ...
gt;gt; gt;I quite like this.
gt;gt; gt; Please can you tell me what to change to only have this in one cell.
gt;gt; gt; (say
gt;gt; gt; A2)
gt;gt; gt;
gt;gt; gt; Thanking you in anticipation.
gt;gt; gt; Your help is and always has been very much appreciated.
gt;gt; gt; --
gt;gt; gt; Big Rick
gt;gt; gt;
gt;gt; gt;
gt;gt; gt; quot;Don Guillettquot; wrote:
gt;gt; gt;
gt;gt; gt;gt; Do as I said and any date such as 3/15 entered into any cell in column
gt;gt; gt;gt; B
gt;gt; gt;gt; will say MAR
gt;gt; gt;gt;
gt;gt; gt;gt; --
gt;gt; gt;gt; Don Guillett
gt;gt; gt;gt; SalesAid Software
gt;gt; gt;gt;
gt;gt; gt;gt; quot;Josh O.quot; gt; wrote in message
gt;gt; gt;gt; ...
gt;gt; gt;gt; gt; Is there anything I need to do?
gt;gt; gt;gt; gt;
gt;gt; gt;gt; gt; quot;Don Guillettquot; wrote:
gt;gt; gt;gt; gt;
gt;gt; gt;gt; gt;gt; right click sheet tabgt;view codegt;insert thisgt;
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt; gt;gt; Private Sub Worksheet_Change(ByVal Target As Range)
gt;gt; gt;gt; gt;gt; If Target.Column lt;gt; 2 Then Exit Sub
gt;gt; gt;gt; gt;gt; Target = UCase(Format(Target, quot;MMMquot;))
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt; gt;gt; End Sub
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt; gt;gt; --
gt;gt; gt;gt; gt;gt; Don Guillett
gt;gt; gt;gt; gt;gt; SalesAid Software
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt; gt;gt; quot;Josh O.quot; gt; wrote in message
gt;gt; gt;gt; gt;gt; ...
gt;gt; gt;gt; gt;gt; gt; Is there a way to get a number format to show capital letters?
gt;gt; gt;gt; gt;gt; gt;
gt;gt; gt;gt; gt;gt; gt; For example, I want to display 3/14/2006 as quot;MARquot;. I can get it
gt;gt; gt;gt; gt;gt; gt; to
gt;gt; gt;gt; gt;gt; gt; display
gt;gt; gt;gt; gt;gt; gt; as Mar, but my boss wants it to appear as capital letters.
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt; gt;gt;
gt;gt; gt;gt;
gt;gt; gt;gt;
gt;gt; gt;gt;
gt;gt;
gt;gt;
gt;gt;