如何修改最初在录制的宏中定义的文件名?

时间:2019-06-04 15:10:03

标签: excel vba

我记录了一个宏,该宏可以过滤并重新格式化报告中的数据。我想自动保存文件,但是报告的名称每次运行都需要更改。文件名的结构为“ 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

我的解决方法是包括一个用户提示,以手动输入文件名,但是最好完全自动化。

1 个答案:

答案 0 :(得分:0)

您可以设置以下内容,并将“您的姓名首字母”更改为变量或单元格位置,例如Range(“ A1”)

"S:\shared\5. QC\QC Samples\" & Year(Now) & "\" & Format(Now, "yymmdd") & "_Sample_Set1_QC_" & "Your Initial" & ".xlsx"