如何通过代码设置报表默认导出为Excel？（报表116客户对账单）

针对你遇到的问题——调用ChosenOutputMethod := CustomLayoutReporting.GetExcelOption;后预览仍未导出Excel，且希望将报表默认导出Excel的设置内置到报表本身，以下是经过验证的可行方案：

核心逻辑说明 #

要实现报表启动后直接触发Excel导出，需要在报表的OnPreReport触发器中完成两个关键操作：正确绑定Excel输出选项，同时跳过默认的预览环节。之前的代码只做了第一步，缺少强制输出和跳过预览的配置，所以没有生效。

具体实现步骤（以报表116客户对账单为例） #

1. 打开报表设计界面 #

在Business Central开发环境中打开报表116，找到并编辑OnPreReport触发器。

2. 添加完整代码逻辑 #

将以下代码替换或追加到触发器中：

trigger OnPreReport()
var
    CustomLayoutReporting: Codeunit "Custom Layout Reporting";
    OutputManagement: Codeunit "Output Management";
    ChosenOutputMethod: Option;
begin
    // 获取系统配置的Excel输出选项
    ChosenOutputMethod := CustomLayoutReporting.GetExcelOption();
    // 强制将当前报表的输出方式设置为Excel
    OutputManagement.SetChosenOutputMethod(ChosenOutputMethod);
    // 跳过预览环节，直接触发导出流程
    CurrReport.Preview := false;
end;

关键代码解释 #

• CustomLayoutReporting.GetExcelOption()：安全获取系统对应的Excel输出枚举值，比硬编码选项值更适配不同环境的配置
• OutputManagement.SetChosenOutputMethod()：将Excel输出绑定到当前报表，让系统识别默认导出格式
• CurrReport.Preview := false;：跳过报表默认的预览界面，直接启动Excel导出流程，解决你之前点击预览无导出动作的问题

额外注意事项 #

• 确保报表使用的是自定义布局（Custom Layout），因为CustomLayoutReporting代码单元仅对自定义布局生效，传统RDLC布局无法使用此方案
• 测试时直接运行报表即可，无需手动点击预览，代码已跳过预览环节
• 该设置完全内置在报表代码中，后续每次运行该报表都会自动触发Excel导出，无需用户额外操作

内容的提问来源于stack exchange，提问作者Jonathan Lam