R rvik Apr 22, 2004 #1 i have text as bold and unbolded, in various cells. i would like t count the bold text. any help appreciated
i have text as bold and unbolded, in various cells. i would like t count the bold text. any help appreciated
F Frank abel Apr 22, 2004 #2 Hi try the following user defined function public Function Count_Bold(rng as range) Dim ret_value Dim cell as range For each cell in rng If cell.font.bold then If cell.value<>"" then ret_value = ret_value + 1 end if end if next Count_Bold = ret_value end Function Now use this function like =COUNT_BOLD(A1:A30)
Hi try the following user defined function public Function Count_Bold(rng as range) Dim ret_value Dim cell as range For each cell in rng If cell.font.bold then If cell.value<>"" then ret_value = ret_value + 1 end if end if next Count_Bold = ret_value end Function Now use this function like =COUNT_BOLD(A1:A30)