Evan的工作表包含许多化学符号,例如H2O。当他第一次进入化合物时,他可以将2格式化为下标。但是,Evan需要搜索没有下标2的实例,并用正确下标的符号替换它。他想知道是否有简单的方法可以做到这一点。

使用Excel的“查找和替换”功能无法执行此操作。

原因?正如一位ExcelTips订户所说的那样,“ Excel在处理单元格中的富文本方面异常糟糕。”事实证明,您无法在单元格中搜索混合格式或无法用混合格式替换。

请注意,我说的是“混合格式”,这是Evan想要的-“ H”

和“ O”使用与“ 2”不同的格式。如果Evan想要将整个单元格的内容更改为常规文本或订阅,则可以使用常规的“查找和替换”工具。但是,它不适用于混合格式。

这意味着最好的方法是使用宏进行查找和替换。有几种方法可以解决此问题。以下只是其中之一。

Sub SubscriptNumbers()

Dim c As Range     Dim sWord As String     Dim sChar As String     Dim x As Long

For Each c In Selection         sWord = c.Value         For x = 1 To Len(sWord)

sChar = Mid(sWord, x, 1)

If sChar >= "0" And sChar <= "9" Then                 c.Characters(Start:=x, Length:=1).Font _                   .Subscript = True             End If         Next x     Next c     Set c = Nothing End Sub

若要使用宏,请选择要修改的单元格,然后运行它。

它逐步遍历选择中的每个单元格,然后检查单元格内容。如果内容中有任何数字,则这些数字的格式设置为下标。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(13362)适用于Microsoft Excel 2007、2010、2013、2016、2019和Office 365中的Excel。