Creating Names for Cells Using Code (RESOLVED)

**Daniel McCool** · Aug 30th, 2003, 02:49 PM

I am trying to create a loop that will pass through every cell in a column and define it a name based on the cell's value.

VB Code:

For X = start To finish
            Sheets(2).Cells(X, 6).Name = Sheets(2).Cells(X, 6).Value
    Next X

I doesn't seem to like this. Any help? Thanks.

**adocwra** · Aug 30th, 2003, 08:02 PM

ThisApplication.Names.Add("NewName", "=Sheet1!$A$6")

**adocwra** · Aug 30th, 2003, 08:17 PM

Code:

c = "a"
r = "9"
sh = "sheet1"

s = "=" & sh & "!$" & c & "$" & r

'
Application.Names.Add "anna", s

specifically

Thread: Creating Names for Cells Using Code (RESOLVED)