Как в экспорт отчета через VBA - в название файла вставить [КодОтчета]

Четверг, 27 Августа 2015 г. 16:31 + в цитатник

Здравствуйте, подскажите пожалуйста

Как в экспорт отчета через процедуры VBA -> вставить [КодОтчета], что бы имя экспортируемого файла имело вид: "Т.Чек № [КодОтчета] от 2015_08_27.pdf"
Сейчас имя файла имеет вид: "Т.Чек № от 2015_08_27.pdf"

Function CheckVBA()
    On Error Resume Next
    DoCmd.RunCommand acCmdSaveRecord
    DoCmd.OutputTo acOutputReport, "о_ТоварныйЧекОбщий", "PDFFormat(*.pdf)", _
    "d:\Товарные чеки\Т.Чек № от" & Format(Date, "yyyy_mm_dd") & ".pdf", _
    True, "", , acExportQualityPrint
    DoCmd.RunCommand acCmdPrint
End Function