File name needs to include a date

[cowells]

Hi All

So I’m looking to open a macro enabled workbook “LoadFile” press a button (running a couple of macros).

1 button will create a new file, named “MasterFile_xx_xx_xxxx, where the x’s will be appended with the date supplied by the user in the loadfile workbook
2.button will copy worksheets from multiple folders and files to this new workbook
3.button will save the new book, make it active and close the “LoadFile” book

I have the code for 2/3 just struggling with 1

 

[Marc L]

Hi,​

​

for the first point you should use the Format VBA text function …​

 

[cowells]

Hi,​

​

for the first point you should use the Format VBA text function …​

Sorry, how does format use the date given in the worksheet in the new file name?

 

[Fluff]

You can use it like

Dim Fname As String
Fname = "MasterFile_" & Format(Range("A1").Value, "dd_mm_yyyy")

 

[cowells]

You can use it like

Dim Fname As String
Fname = "MasterFile_" & Format(Range("A1").Value, "dd_mm_yyyy")

Thanks, but the date is in the correct format already in cell k4 i.e xx_xx_xxxx, just need to save the file (to a web location..https://…etc) with the name, for example: Masterfile_29_06_2021 and then I can run (press) button tow & three to complete the details. I tried the above and got an error?

 

[Fluff]

Does the cell contain an actual date or text?

 

[cowells]

Does the cell contain an actual date or text?

Hi text, i got the user to ‘select’ the three elements from a list, then joined those elements back together to produce the xx_xx_xxxx string. I just need to understand how I can save the file with the two strings 1.Name 2. Xx_xx_xxxx as one file name name in an agreed location. As the xx bit will change each week/month.

 

[Fluff]

In that case just use

Dim Fname As String
Fname = "MasterFile_" & Range("A1").Value

 

[cowells]

In that case just use

Dim Fname As String
Fname = "MasterFile_" & Range("A1").Value

Thanks works fine!

 

[Fluff]

You're welcome & thanks for the feedback.