列标题未正确导出到Excel

时间:2017-03-24 21:47:11

标签: ms-access formatting access-vba

我有一个Access数据库,我用它来构建数据以传输到我创建的Excel模板。我的查询中有一个名为“#Ob Directs”的字段,当我运行查询时,字段名称显示正确。我正在使用以下内容导出到具有完全相同字段的模板:

[2017-03-24 15:34:41 - Dex Loader] Failed to load C:\Users\jaimemontoya\android-sdks\build-tools\26.0.0-preview\lib\dx.jar

字段名称将更改为“.OA指令”。我试图通过改变

解决这个问题
Function Transfer()

Dim xlsxDestinationWorkbook As String

FileCopy "\\1dc.com\common\OMA_COMMON1\HRDEX\Corporate Reporting\Spans and Layers\Spans & Layers MASTER_TEMPLATE.xlsb", _
"\\1dc.com\common\OMA_COMMON1\HRDEX\Corporate Reporting\Spans and Layers\Spans & Layers MASTER_" & Format(Date, "yyyy_mm_dd") & ".xlsb"

xlsxDestinationWorkbook = "\\1dc.com\common\OMA_COMMON1\HRDEX\Corporate Reporting\Spans and Layers\Spans & Layers MASTER_" & Format(Date, "yyyy_mm_dd") & ".xlsb"

DoCmd.TransferSpreadsheet acExport, , "QRY_HEADCOUNT_OA_DETAIL", xlsxDestinationWorkbook, False, "Headcount Detail"

End Function

DoCmd.TransferSpreadsheet acExport, , "QRY_HEADCOUNT_OA_DETAIL", xlsxDestinationWorkbook, False, "Headcount Detail"

我的理解是,我选择的true或false将决定标题行是否放入我的模板中,但无论哪种方式,它似乎都会更新此字段。非常感谢任何帮助,客户希望以这种方式命名该字段,并且如果无法修复列名,则需要修改导入过程来获取文件本身。

0 个答案:

没有答案