EXCEL中，如何用函数提取某单元格中格式为加粗的文字?如何通过在函数中设置条件提取单元格内部分数值？

Question

一、如何用函数提取某单元格中格式为 加粗 的文字?（已知A1，求：B1） A1 B1 我爱我家 假日的清晨……我爱我家 我爱我家 黎明前的沉思 辗转间黎明悄然而至…… 黎明前的沉思 二、如何通过在函数中设置条件提取单元格内部分数值？(已知C1，求：D1，E1.) C1 D1 E1 ￥9.40市场价：￥10.40 9.40 10.40 ￥99.40市场价：￥102.40 99.40 102.40

Answer 1

第一个必须用宏自定义函数。同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码： Function qct(xRng As Range) As String Dim i As Integer For i = 1 To Len(xRng) If xRng.Characters(i, 1).Font.Bold Then qct = qct & xRng.Characters(i, 1).Text Next i End Function 回到Excle，在B1输入 =qct(A1) 公式可以复制的。 第二个问题，在D1、E1分别输入 =LEFT(C1,FIND("市",C1)-1) =MID(C1,FIND("：",C1)+1,100) 公式向下复制。