Yes use CreateNames method.
For exmaple
Range.CreateNames(Top, Left, Bottom, Right)
The 4 parameters are all optional and defaualt to False.
So if in the next example range your names were in the top row you would code
Range("A1:D4").CreateNames Top:=True
voodoo