Solved

How is possible to change "save as" date format to capital letters?

Posted on 2011-02-20
2
243 Views
Last Modified: 2012-05-11
I use the attached code in a "save as" macro.
How should I change it so that the month format is in capital letters
ie "\2011\FEB 2011" instead of "\2011\Feb 2011"
Thanks for your help
Des
strDirname = "\" & Format(Date, "yyyy") & "\" & Format(Date, "mmm yyyy")

Open in new window

0
Comment
Question by:spar-kle
2 Comments
 
LVL 50

Accepted Solution

by:
Dave Brett earned 500 total points
ID: 34939249
hth

strDirname = UCase$("\" & Format(Date, "yyyy") & "\" & Format(Date, "mmm yyyy"))

Open in new window

0
 

Author Closing Comment

by:spar-kle
ID: 34939281
Thanks Dave
I knew it would be easy, played aound with UCASE but couldn't figure it out.
Des
0

Featured Post

Master Your Team's Linux and Cloud Stack!

The average business loses $13.5M per year to ineffective training (per 1,000 employees). Keep ahead of the competition and combine in-person quality with online cost and flexibility by training with Linux Academy.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This tutorial explains how to create a series of drop-down lists that are dependent upon prior selections to guide (“force”) the user to make the correct selection and reduce data errors within Microsoft Excel. Excel 2010 was used for this tutorial;…
This article will guide you to convert a grid from a picture into Excel format using Microsoft OneNote and no other 3rd party application.
This Micro Tutorial will demonstrate how to use a scrolling table in Microsoft Excel using the INDEX function.
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

777 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question