Wrote this is Excel7.0-VBA....Runs fine in Excel/95!  Under Excel/Off97
the 'offset' command either does NOT work or renames all over the place,
rather than next row down.     Here's code.....what's diff. in VBA lang.
for Excel for 97?

        With Sheets("Database").Range("DBTop")
                'put some stuff in columns
                .Offset(1,0).Name= "DBTop"
        End With

Thanx for help

Try

        With Sheets("Database").Range("DBTop")
                'put some stuff in columns
                .Offset(1,0).Select
       End With
        Application.Names.Add Name:="DBTop", RefersTo:=Selection