我记录了一个宏,该宏可以过滤并重新格式化报告中的数据。我想自动保存文件,但是报告的名称每次运行都需要更改。文件名的结构为“ 190509_Sample_Set1_TFB”,其中日期,设置号和首字母更改。
当我最初记录宏时,我只是突出显示了我直接从报表中需要的那条信息,并将其用作文件名保存。
ActiveCell.FormulaR1C1 = "Working List Source: 190509_Sample_Set1_TFB"
ChDir "S:\shared\5. QC\QC Samples\2019"
ActiveWorkbook.SaveAs Filename:= _
"S:\shared\5. QC\QC Samples\2019\190509_Sample_Set1_QC_TFB.xlsx", _
FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
我的解决方法是包括一个用户提示,以手动输入文件名,但是最好完全自动化。
答案 0 :(得分:0)
您可以设置以下内容,并将“您的姓名首字母”更改为变量或单元格位置,例如Range(“ A1”)
"S:\shared\5. QC\QC Samples\" & Year(Now) & "\" & Format(Now, "yymmdd") & "_Sample_Set1_QC_" & "Your Initial" & ".xlsx"