Excel中使用CONCAT函数时如何保留上标格式？

方法一：VBA宏批量处理（最灵活的自动化方式） #

适合数值和上标字母分栏存储的场景，能批量生成带格式的合并内容：

1. 打开目标Excel文件，按下Alt + F11打开VBA编辑器
2. 右键左侧当前工作簿名称，选择「插入」→「模块」
3. 将以下代码粘贴到模块窗口：

Sub MergeWithSuperscript()
    Dim dataRow As Range
    Dim numCol As Range, supCol As Range, resultCol As Range
    
    ' 按需修改列范围：A列为数值，B列为上标字母，C列为结果输出列
    For Each dataRow In Range("A2:A" & Cells(Rows.Count, "A").End(xlUp).Row)
        Set numCol = dataRow
        Set supCol = dataRow.Offset(0, 1)
        Set resultCol = dataRow.Offset(0, 2)
        
        ' 写入合并文本
        resultCol.Value = numCol.Value & supCol.Value
        ' 将上标字母部分设置为上标格式
        resultCol.Characters(Start:=Len(numCol.Value) + 1, Length:=Len(supCol.Value)).Font.Superscript = True
    Next dataRow
End Sub

4. 根据你的实际列位置修改代码中的列偏移（Offset(0,1)代表右侧第1列，Offset(0,2)代表右侧第2列），按下F5运行宏即可完成批量处理。

方法二：自定义格式（适合固定标注场景） #

如果上标字母是固定的几类（如A、B、AB），可以直接给数值单元格设置自定义格式，无需合并：

1. 选中数值单元格，右键选择「设置单元格格式」→「数字」→「自定义」
2. 输入对应格式代码：
   • 上标A：0.0"^A"
   • 上标B：0.0"^B"
   • 上标AB：0.0"^AB"
3. 确认后，单元格会自动显示为「数值+上标字母」的格式，且保留数值可编辑性。

补充说明 #

• CONCAT函数仅提取文本内容，无法保留格式信息，因此无法直接用它实现需求；
• 如果上标字母和数值在同一单元格内，可修改VBA代码遍历字符格式，实现格式复制。

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