I had this data stating in A1
name account owing
smith a12 10
jones a22 20
liengme a33 30
macdonald a45 25



Here is a very simple subrountine to play with
Sub Macro2()
'
' Macro2 Macro
' Macro recorded 07/08/2007 by Bernard V Liengme
'

'
Range("A1").Select
Range(Selection, Selection.End(xlToRight)).Select
Range(Selection, Selection.End(xlDown)).Select
Selection.CreateNames Top:=True, Left:=False, Bottom:=False, Right:= _
False
Range("A1").Select
MsgBox Application.Sum(Range("owing"))
End Sub


--
Bernard V Liengme
Microsoft Excel MVP
www.stfx.ca/people/bliengme
remove caps from email

"Hemant_india" wrote in message
...
hi
i have a sheet having 52 columns and around 2000 rows
actually the data is imported from access table
therefore first row is occupied by the fields name
my question is how do i use these field names while coding in vba?
--
hemu