Problem adding hyperlink in VBA

[jasonb75]

Hi all, Does anyone have an idea how I can make this work?

ActiveSheet.Hyperlinks.Add Anchor:=Cells(b, c - 1), Address:="", SubAddress:=Cells(b, c - 1), TextToDisplay:=d

I want to link the cell to itself with the hyperlink, (yes there is a reason for it) this line works with Range but not Cells, unfortunately both variables return integers so I need to somehow convert the numeric value of the varaible "c" to the corresponding column.

I'm sure it should be an easy and obvious task but I've been looking at code all day and can't see it

Thanks in advance

JB

 

[jasonb75]

I'm still at a loss on this one, it could be that the error is elsewhere in the code, as I checked some other code I have that creates hyperlinks and that works with Cells.

I've tried this (looks messy) all variables are giving the correct information, but I'm getting a runtime error 5 on the hyperlink line

e = Array("A", "B", "C", "D", "E", "F", "G", "H")
ActiveSheet.Hyperlinks.Add Anchor:=Cells(b, c - 2), Address:="", SubAddress:=Range("'Control_Sheet'!" & e(c - 2) & b), TextToDisplay:=d

Current variable values from mouseover code at error
b = 3
c = 2
e = "A"
All varaibles appear to be producing valid results for the code to work.

Any ideas?

Jason

 

[jasonb75]

Case closed

ActiveSheet.Hyperlinks.Add Anchor:=Cells(b, c - 2), Address:="", SubAddress:=Range("'Control_Sheet'!" & e(c - 2) & b), TextToDisplay:=d

I was trying to link to cell content, not cell address, deleting the red text solved it.