excel下标-Excel 中，设置上标有三种方法，包含在公式中设置、批量设置等

在 Excel 中，设置上标有三种方法，一种是用Excel提供的选项设置，第二种是用快捷键设置，第三种用公式工具栏设置；其中用快捷键可以用于在公式中设置上标，用公式工具栏可同时设置上下标。Excel下标设置有两种方法，即设置上标的第一种与第三种方法。另外，还可以用宏 VBA 实现批量设置上标。以下就是Excel上下标设置的方法，包含在公式中设置、批量设置与同时设置上下标的实例，实例操作所用版本均为 Excel 2016。

一、Excel上下标的输入方法

（一）上标的输入方法

1、假如要把带圈序号 ① 作为 135 的上标。选中 A1 单元格中的带圈序号 ① ，按 Ctrl + 1（或右键 ① ，在弹出的菜单中选择“设置单元格格式”），打开“设置单元格格式”窗口，勾选“上标”，则 ① 变为 135 的上标，操作过程步骤，如图1所示：

图1

2、提示：把 ① 作为上标后，如果要在 135 后继续输入，光标会定位到 ① 的后，即输入的文字继续作为上标，如图2所示：

图2

此时，只需再次按 Ctrl + 1，打开“设置单元格格式”窗口，不勾选“上标”，单击“确定”即可，如图3所示：

图3

(二）下标的输入方法

假如要把 n 作为 C 的下标。选中 A1 单元格，输入 Cn，选中 n，按 Ctrl + 1，打开“设置单元格格式”窗口，勾选“下标”，单击“确定”，则 n 变为 C 的下标，操作过程步骤，如图4所示：

图4

二、Excel用快捷键输入公式中的上标（平方和立方）

（一）用快捷键 Alt + 178 输入公式中的平方

1、选中 C1 单元格，输入公式 =SUM(A1,B1)&"m，按 Alt + 小键盘上的 178，则输入平方，再输入双引号 "；按回车，返回 48m；把鼠标移到 C1 右下角的单元格填充柄上，鼠标随即变为十字架图标，按住左键，往下拖，则所经过单元格自动求和且加上单位平方米；操作过程步骤，如图5所示：

图5

2、提示：输入 m 平方时，要关闭中文输入法，如果是独立的输入法，按 Shift 关闭不行，就把它退出。

（二）用快捷键 Alt + 179 输入公式中的立方

1、选中 C1 单元格，输入公式 =PRODUCT(A1,B1)&"m，按 Alt + 小键盘上的 179，则输入立方，再输入双引号 "，如图6所示：

图6

2、按回车，返回 455m；同样用往下拖的方法求剩余数个的乘积且加带立方米单位，如图7所示：

图7

三、Excel上下标同时设置

1、假要要设置 C 的上下标。选中 A1 单元格，按住 Alt，按一次 N，按一次 J，打开“对象”窗口，往下拖右边的滑块一直找到 Microsoft 公式 3.0，双击它，则插入“公式”小窗口，单击“上标和下标模板”图标，在弹出的窗口中选择“有上下标”的图标，则插入该图标到 A1，光标定位在下标，输入下标 m；单击中间的虚线框把光标定位到里面，输入 C；再把光标定位到上标虚线框，输入 2，则输入完成；操作过程步骤，如图8所示：

图8

2、如果要修改，双击 C 即可，但会出现外框自动变长，上下标与 C 偏离太远的问题，再加上不好调它们的距离，所以尽量一次输入好，实在要修改，如果调不好距离，可以删除重新输入。

3、如果要改字号，双击 C 进入编辑状态，单击“尺寸”，在弹出的菜单中选择“定义”，打开“尺寸”窗口，把“上标/下标”改为 10 磅，“标准”用于调整 C 的字号，这里保持默认的 12 号，单击“确定”，上下标字号变为 10 磅，操作过程步骤，如图9所示：

图9

四、Excel批量设置上标

1、选中 A 列，按 Alt + F1，打开 VBA 代码编辑窗口，单击“插入”，在弹出的菜单中选择“模块”，新建一个模块窗口，把以下代码：

Sub AddSup()

For Each C In Selection

If [C].Value <> "" Then

C.Characters(Start:=Len(C), Length:=1).Font.Superscript = True

End If

Next C

End Sub

复制到新建的模块窗口，按 F5 打开“宏”窗口，单击“运行”，则开始把选中的 A 列中 m2 变为 m，运行结束后，A 列中所有文字单元格全把 m2 变为 m，操作过程步骤，如图10所示：

图10

提示：如果有内容的单元格不多，可以只框选有内容的单元格区域，这样运行速度会快。

2、代码说明

A、For Each C In Selection 定义 C 为所有选中单元格的其中之一，Selection 表示所有选中单元格；第一次遍历，C 为 A1，第二次遍历，C 为 A2，以此类推。

B、If [C].Value <> "" Then 意思是：如果当前单元格的内容不为空，则执行 C.Characters(Start:=Len(C), Length:=1).Font.Superscript = True；Len(C) 用于返回当前单元格 C 中内容的字符个数，Superscript 表示设置为上标，Characters(Start:=Len(C), Length:=1).Font.Superscript = True 表示从 C 中内容的字符个数开始把 1 个字符设置为上标，例如当前单元格为 A1，Len(A1) = 4，则 Characters(Start:=4, Length:=1).Font.Superscript = True 表示从第 4 个字符（即 2）开始，把一个字符（即把 2）设置为上标。