Results 1 to 11 of 11
  1. #1
    Star Lounger
    Join Date
    Jul 2005
    Location
    Mandenville, Louisiana, USA
    Posts
    62
    Thanks
    0
    Thanked 0 Times in 0 Posts

    CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    hI ALL
    Anyone know a way to name a cell to the column letter?

    cell a1=A
    cell B1=B
    Cell Ak=AK
    so on

  2. #2
    Platinum Lounger
    Join Date
    Feb 2001
    Location
    Weert, Limburg, Netherlands
    Posts
    4,812
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Use this formula:

    =LEFT(ADDRESS(1,COLUMN(),4,1),LEN(ADDRESS(1,COLUMN (),4,1))-1)
    Jan Karel Pieterse
    Microsoft Excel MVP, WMVP
    www.jkp-ads.com
    Professional Office Developers Association

  3. #3
    Star Lounger
    Join Date
    Jul 2005
    Location
    Mandenville, Louisiana, USA
    Posts
    62
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Thanks

  4. #4
    5 Star Lounger
    Join Date
    Aug 2004
    Location
    Connecticut, USA
    Posts
    816
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    An alteration of Jan's:

    =(SUBSTITUTE(ADDRESS(1,COLUMN(),4),"1",""))

  5. #5
    Silver Lounger
    Join Date
    Jul 2001
    Location
    Ottawa, Ontario, Canada
    Posts
    1,609
    Thanks
    0
    Thanked 1 Time in 1 Post

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Hi Keith
    I'm curious as to how you would use this.
    Regards
    Don

  6. #6
    Silver Lounger
    Join Date
    Dec 2000
    Location
    California, USA
    Posts
    1,758
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    How would this SUBSTITUTE(ADDRESS(1,COLUMN(),4),"1","")) be stated in code?

    I am having a challenge with the "address" part.

    Example:
    SUBSTITUTE(ADDRESS(1,ActiveCell.Column,4,"1",""))


    Thanks,
    John

  7. #7
    Platinum Lounger
    Join Date
    Feb 2002
    Location
    A Magic Forest in Deepest, Darkest Kent
    Posts
    5,681
    Thanks
    0
    Thanked 1 Time in 1 Post

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Howzabout


    =LEFT(ADDRESS(ROW(), COLUMN(), 4),1)
    Jerry

  8. #8
    Plutonium Lounger
    Join Date
    Mar 2002
    Posts
    84,353
    Thanks
    0
    Thanked 29 Times in 29 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Assuming that you want to know the column letter(s) of the active cell, the literal translation would be
    <code>
    Replace(Cells(1, ActiveCell.Column).Address(False, False),"1","")</code>

  9. #9
    5 Star Lounger
    Join Date
    Aug 2004
    Location
    Connecticut, USA
    Posts
    816
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Anything after column 26 will show an undesired result.

  10. #10
    Platinum Lounger
    Join Date
    Feb 2002
    Location
    A Magic Forest in Deepest, Darkest Kent
    Posts
    5,681
    Thanks
    0
    Thanked 1 Time in 1 Post

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    Whoops, good point <img src=/S/blush.gif border=0 alt=blush width=15 height=15>
    Jerry

  11. #11
    WS Lounge VIP rory's Avatar
    Join Date
    Dec 2000
    Location
    Burwash, East Sussex, United Kingdom
    Posts
    6,280
    Thanks
    3
    Thanked 191 Times in 177 Posts

    Re: CELLS EQUAL COLUMN LETTER (EXCEL 2000)

    For versions prior to 2007, only a small adjustment needed:
    <code>=LEFT(ADDRESS(ROW(),COLUMN(),4),1+(COLUMN()> 26))</code>
    Regards,
    Rory

    Microsoft MVP - Excel

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •