根据今天的日期命名的文件夹

时间:2018-01-12 10:15:45

标签: excel vba

我正在编写一些完美的VBA代码。但问题是,我有一个每日文件夹,其名称根据今天的日期有8个字符,即10/01/2017将为12012017

所以我尝试了各种不同的公式,而我最接近解决方案的是在每个单元格中使用以下内容

=DAY(TODAY())    - A1
=MONTH(TODAY())  - B1 
=YEAR(TODAY())   - C1

并将日期和月份设置为2个字符,以防它是1 - 9,相当于01 - 09.但问题是我将单元格与"&" ( =A1 & B2 & C1 )零自动消失。它不是打印12012018,而是显示1212018

我没有想法,有人可以帮忙

3 个答案:

答案 0 :(得分:1)

尝试(VBA代码)

foldername = right("00" & day(now), 2) & right("00" & month(now), 2) & year(now)

答案 1 :(得分:1)

使用TEXT函数,因此=TEXT(A1,"00")将保留前导零。

=TEXT(A1,"00")&TEXT(B1,"00")&TEXT(C1,"0000")

答案 2 :(得分:1)

你甚至可以在一行中制作它:

=TEXT(TODAY();"DDMMYYYY")