如何用DEFINE语句为PROC REPORT单单元格变量标签设置多色

要实现Excel输出中单个表头单元格显示两种颜色，需要结合ODS Excel和Proc Report的compute header块，利用HTML内嵌样式指定不同文本段的颜色。以下是具体实现方案：

核心逻辑 #

Proc Report的常规define语句无法直接为表头内的部分文本设置差异化样式，但通过在compute header块中输出带有HTML样式标记的文本，ODS Excel会解析这些标记并应用对应格式。

修改后的完整代码 #

/* 生成测试数据集 */
data test;
input lab s1 $ s2 $;
datalines;
1 A1 A2
2 B1 B2
3 C1 C2
;
run;

/* 指定Excel输出路径 */
ods excel file="C:\your_output_path\multi_color_header.xlsx" style=htmlblue;

proc report data=test nowindows missing    
    style(column)=[foreground=black background=WHITE font_face=arial font_size=10pt just=center ]
    style(header)=[background=white font_face=arial font_size=10pt just=center fontweight=bold];
    column lab s1 s2;
    
    define lab/"Lab Number" center;
    /* 先将目标列的表头置空，后续在compute块中自定义输出 */
    define s1/ display "" center;
    define s2/ display "" center;

    /* 为s1表头设置多色文本：黑色主标题 + 红色备注 */
    compute header s1;
        call define(_col_, "header", 
            "<span style='color:black'>sample 1 </span><span style='color:red'>(Use this on Primary page)</span>");
    endcomp;

    /* 为s2表头设置多色文本：黑色主标题 + 红色备注 */
    compute header s2;
        call define(_col_, "header", 
            "<span style='color:black'>sample 2 </span><span style='color:red'>(Use this on Secondary page)</span>");
    endcomp;
run;

ods excel close;

关键说明 #

• 必须使用ODS Excel：只有ODS Excel输出目标支持解析HTML内嵌样式标记，传统Listing或其他输出方式无法实现此效果。
• compute header块的作用：通过call define函数动态替换表头内容，将带<span>样式的文本传入，实现单单元格内的多色拆分。
• HTML样式标记：<span style='color:xxx'>文本内容</span>是基础的HTML样式语法，ODS Excel会识别并应用对应的颜色设置。

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