close

It can be solved with a UDF:

Function ExtrBold(str)
ExtrBold = quot;quot;
For s = 1 To Len(Range(str).Value)
If Range(str).Characters(1, s).Font.Bold Then
ExtrBold = Left(Range(str).Value, s)
Else
Exit Function
End If
Next s
End Function

Usage:

=ExtrBold(ADDRESS(1,1,4,1))

where ADDRESS(1,1,4,1) refers to cell A1

Regards,
Stefi

?bamse??ezt ?rta:

gt; Hello!
gt; I have a great list of names in a column.
gt; The names are in bold letters, and the titles is in normal letters.
gt;
gt; Is there a way to extract only the bold letters from these cells?
gt;
gt; I have spent a few hours searching for this but haven't seen any solutions
gt; for it.
gt;
gt; Most thankful
gt; /Henrik
gt;
gt;

arrow
arrow
    全站熱搜
    創作者介紹
    創作者 software 的頭像
    software

    software

    software 發表在 痞客邦 留言(0) 人氣()