Assign a macro to a hyperlink

I found this whilst trawling the web and I was wondering if there was some way to modify the macro (specifically the 'Select Case Target.Address' >
'Case “$A$1″' area) to run through many rows without having to create a seperate Case per row (i.e. having 'i' as the number of rows and creating 'Case “$A$i″).

I would be grateful for any thoughts on this matter

Cheers.

"Independent of the hyperlink, put a SelectionChange event in the worksheet code module. To do this, right click the sheet tab, and select View Code. In the code module that pops up, select Worksheet from the top left dropdown, which puts the following procedure into the code module:"

Please Login or Register  to view this content.

You question is not clear, but if you want to do something to a cell on the
row selected:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

' just to demonstrate how you could work with
' a cell in the same row as the cell selected
Msgbox cells(target.row,"F").address

End Sub

--
Regards,
Tom Ogilvy

"Daminc" wrote:

>
> I found this whilst trawling the web and I was wondering if there was
> some way to modify the macro (specifically the 'Select Case
> Target.Address' >
> 'Case β€œ$A$1β€³' area) to run through many rows without having to
> create a seperate Case per row (i.e. having 'i' as the number of rows
> and creating 'Case β€œ$A$iβ€³).
>
> I would be grateful for any thoughts on this matter
>
> Cheers.
>
> > -"Independent of the hyperlink, put a SelectionChange event in the
> > worksheet code module. To do this, right click the sheet tab, and
> > select View Code. In the code module that pops up, select Worksheet
> > from the top left dropdown, which puts the following procedure into the
> > code module:"-
>
>
> Code:
> --------------------
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> End Sub
> You then adjust what’s between the Sub and End Sub to get what you want:
> Private Sub Worksheet_SelectionChange(ByVal Target As Range)
> Select Case Target.Address
> Case β€œ$A$1β€³
> β€˜ carry out action for Cell A1
> Case β€œ$A$2β€³
> β€˜ carry out action for Cell A2
> β€˜ etc.
> End Select
> End Sub
> --------------------
>
>
> --
> Daminc
> ------------------------------------------------------------------------
> Daminc's Profile: http://www.excelforum.com/member.php...o&userid=27074
> View this thread: http://www.excelforum.com/showthread...hreadid=537207
>
>

Cheers for your reply Tom.

I'm away until Tuesday and I'm going to take a closer look at this procedure them.

Hi Tom, back again

I've tried that macro you posted and I see where you're coming from.

To make my original post a little clearer:

I'm planning to create a hyperlink to a name on a worksheet that, when clicked, will bring up contact details or a graph dipiciting recorded statistics etc depending which will be most required by the person how will use this application.