Renaming Sheet Tab to Upper Case Letters
 

In VBA:

Sheets("APRIL (2)").Name = Format(Date, "MMM")

The result is May. But I want May with upper case letters, MAY. How can I
achieve this?

--
Cue

Renaming Sheet Tab to Upper Case Letters
 

Hi Cue

You can use UCase

UCase(Format(Date, "MMM"))

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Cue" wrote in message ...
In VBA:

Sheets("APRIL (2)").Name = Format(Date, "MMM")

The result is May. But I want May with upper case letters, MAY. How can I
achieve this?

--
Cue

Renaming Sheet Tab to Upper Case Letters
 

Try this:

Sheets("APRIL (2)").Name = Ucase(Format(Date, "MMM"))


--
Biff
Microsoft Excel MVP


"Cue" wrote in message
...
In VBA:

Sheets("APRIL (2)").Name = Format(Date, "MMM")

The result is May. But I want May with upper case letters, MAY. How can I
achieve this?

--
Cue

Renaming Sheet Tab to Upper Case Letters
 

Perfect. Thanks again!
--
Cue


"T. Valko" wrote:

Try this:

Sheets("APRIL (2)").Name = Ucase(Format(Date, "MMM"))


--
Biff
Microsoft Excel MVP


"Cue" wrote in message
...
In VBA:

Sheets("APRIL (2)").Name = Format(Date, "MMM")

The result is May. But I want May with upper case letters, MAY. How can I
achieve this?

--
Cue

Renaming Sheet Tab to Upper Case Letters
 

Perfect. Thanks!
--
Cue


"Ron de Bruin" wrote:

Hi Cue

You can use UCase

UCase(Format(Date, "MMM"))

--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Cue" wrote in message ...
In VBA:

Sheets("APRIL (2)").Name = Format(Date, "MMM")

The result is May. But I want May with upper case letters, MAY. How can I
achieve this?

--
Cue

Renaming Sheet Tab to Upper Case Letters
 

You're welcome!

--
Biff
Microsoft Excel MVP


"Cue" wrote in message
...
Perfect. Thanks again!
--
Cue


"T. Valko" wrote:

Try this:

Sheets("APRIL (2)").Name = Ucase(Format(Date, "MMM"))


--
Biff
Microsoft Excel MVP


"Cue" wrote in message
...
In VBA:

Sheets("APRIL (2)").Name = Format(Date, "MMM")

The result is May. But I want May with upper case letters, MAY. How can
I
achieve this?

--
Cue