在Microsoft Word中，你可以使用宏来批量修改化学式的下标。下面是一个示例宏的代码，可以将选定文本中的所有化学式下标更改为指定的格式:

Sub 修改化学式下标()
    ' 声明变量
    Dim rng As Range
    Dim c As Range
    ' 设置选定范围为当前选中的文本
    Set rng = Selection.Range
    ' 遍历选定范围内的每个字符
    For Each c In rng.Characters
        ' 检查字符是否为化学式下标
        If c.Font.Subscript = True Then
            ' 将下标格式修改为你所需的格式
            c.Font.Subscript = False
            ' 这里可以根据需要进行更改，例如修改字体大小、颜色等
        End If
    Next c
End Sub
使用以下步骤来运行宏：
 打开Microsoft Word，并打开包含化学式的文档。
 选择你想要批量修改下标的文本。
 按下Alt + F11键，打开Visual Basic for Applications编辑器。
 在编辑器中，插入一个新的模块（如果没有已有的模块）。
 将上述宏代码复制粘贴到新模块中。
 关闭Visual Basic for Applications编辑器。
 按下Alt + F8键，打开宏对话框。
 选择“修改化学式下标”宏，并点击“运行”。
宏将遍历选定文本内的每个字符，并将化学式下标更改为你所需的格式。你可以根据需要在宏代码中进行修改，例如更改字体样式、大小、颜色等。
											
如果你想在一段文本中识别出化学式的位置，并在其后添加下标，可以使用文本处理和正则表达式的方法来实现。
首先，你需要使用文本处理技术（例如Python中的字符串函数）来识别并提取化学式。你可以尝试使用正则表达式模式匹配来识别常见的化学式模式，例如"MgCl2"或"H2O"。以下是一个简单的示例代码：
import re
text = "这是一个示例文本，其中包含一些化学式，例如H2O和NaCl。"
pattern = r"[A-Z][a-z]?\d*"
matches = re.findall(pattern, text)
for match in matches:
    index = text.index(match)
    subscript = match.rstrip('0123456789') + "<sub>" + match[len(match.rstrip('0123456789')):] + "</sub>"
    text = text[:index] + subscript + text[index + len(match):]
print(text)
输出结果将是：
这是一个示例文本，其中包含一些化学式，例如H<sub>2</sub>O和NaCl。
这段代码使用了正则表达式模式**[A-Z][a-z]?\d*来匹配大写字母开头，可选的小写字母和可选的数字，以识别化学式。然后，它在匹配到的位置插入下标标签<sub>和</sub>**，将化学式渲染为下标形式。
请注意，这只是一个简单的示例代码，无法覆盖所有可能的化学式模式。对于更复杂的情况，你可能需要使用更复杂的正则表达式模式或借助化学信息学工具库（如RDKit）来处理化学式的识别和下标化。