.Name property in event Worksheet_SelectionChange

[Malachy]

Hello,

I'm trying to pass the Range Name of the active cell every time the Worksheet_SelectionChange event is called.

This code doesn't work...

Private Sub Worksheet_SelectionChange(ByVal Target As Excel.Range)

 Dim rangeString As String
    
    rangeString = ActiveCell.name   
    Call Worksheet_highlight(rangeString)

End Sub

Can anyone advise why ActiveCell.Name returns the string &quot;='Sheet1!$A$1&quot; if cell A1 has a name eg &quot;firstCell&quot;, but returns an error if cell A1 does not have a name; in debug mode the 'tool tip' shows &quot;ActiveCell.name = <Application-defined or Object-defined error>.

In this example, I want to pass the string &quot;firstCell&quot; - Any ideas?

Thank you,

M.

 

[rmikesmith]

Malacy,

The Name property of the Range object returns a Name object. The Name object itself has a Name property. So, to get to the string value that constitutes a &quot;named range&quot; you need syntax such as

rangestring = Activecell.Name.Name

you need to also add

On Error Resume Next

before this line to bypass the error condition (the 1004 error) that will occur if a particular cell does not have a named range.

HTH
Mike

 

[rmikesmith]

Sorry, didn't intend to butcher your handle

 

[Malachy]

Hi Mike,

Thank you that was very helpful - I thought it must be something quite straight forward. You live, you learn! Thanks for the tip on error trapping - it's high time my code included some of that.

M.