同事前来求助，如图1所示，她希望找出A列单元格中的“饰框”两字，并对其标记颜色。思考之后，给她几个建议：
　　1.不完美的条件格式
　　切换到“开始”选项卡，依次选择“条件格式一新建规则”，打开“新建格式规则”对话框，选择“只为包含以下内容的单元格设置格式”规则类型，在下面的规则说明选择“特定文本”，参考图2所示进行设置，接下来点击右下角的“格式”按钮，在随后打开的“设置单元格”对话框格式切换到“字体”选项卡设置字体颜色，依次确认之后即可生效。
　　完成操作之后，所有包含“饰框”的单元格都被设置为指定的颜色，但这并非我们的初衷，因此这种方法并不完美。
　　2.借助“查找”实现颜色标记
　　如果使用的是Excel 2007或更高的版本，那么可以借助“查找”对单元格内的特定字符标记颜色，按下“CtrI+H”组合键，打开“查找和替换”对话框，切换到“查找”选项卡，查找“饰框”，点击“查找全部”按钮，不要关闭“查找和替换”对话框；按下“Ctrl+A”组合键，此时会选中所有包含“饰框”的单元格，不要关闭“查找和替换”对话框；在主界面顶部的编辑栏拖拽选中“饰框”两字，根据需要设置字体颜色，最后按下“Ctrl+Enter”组合键即可生效，如图3所示，很完美吧？
　　3.使用VBA代码实现颜色标j己
　　如果使用的是Excel 2003或更低的版本，那么可以使用VBA代码实现颜色标记，按下“Alt+F11”组合键，打开Microsoft Visual Basic for AppliCations编辑器窗口，依次选择“插入→模块”，在右侧窗格插入一个空白模块，手工输入或粘贴下述代码：
　　Suh test（）
　　Dim Rng，R As Range
　　Dim Str$
　　Set Rng=Application.InputBox（“请选择单元格区域：”，Type：=8）
　　Str=Application.InputBox（“请输入关键字：”）
　　For EachR In Rng
　　If InStr（R，Str） Then
　　R.Characters（InStr（R，Str），Len（Str））.Font.Color=RGB（O，255，0）
　　End If
　　Next
　　End Suh
　　上述代码中的“RGB（O，255，0）”表示标记的颜色，可以根据实际情况进行修改，检查无误之后，依次选择“文件一关闭并返回到Microsoft Excel”命令，返回Excel主界面，按下“Alt+F8”组合键，打开“宏”对话框，选择并运行宏，随后会依次弹出两个对话框，首先选择需要查找的单元格区域，接下来在图4对话框输入需要标记的特定字符，确认之后即可完成颜色标记。