View Single Post
  #8   Report Post  
Posted to microsoft.public.excel.programming
Ron Rosenfeld Ron Rosenfeld is offline
external usenet poster
 
Posts: 5,651
Default Sum of Len(string) for an entire row

On Fri, 21 Oct 2005 18:30:07 -0500, durex
wrote:


Having a hard time wrapping my head around this one as Im still rusty on
the actual VB functions specific to excel...

Im looking for vb code that will return the sum of all characters in a
particular row, where the column header row (row 1) is not empty...

Thanks in advance!


One simple way to do this in code is to just step through each cell. So:

===============
Function LenRow(rg As Range) As Double
Dim c As Range
Dim i As Long

For Each c In rg
LenRow = LenRow + Len(c.Text)
Next c
End Function
================


--ron