Hi All

I am trying to create hyperlinks for the location that has been inserted into the cells thru testpartner. I can insert the location to my hyperlink in the cell. I want to create the hyperlink to that cell. I am unable to do that. but the value is written into the cell.

The variable "msg" will have the location as string.
The variable "m" will get the loaction of the cell. for eg. "A3"

************************************************** ***
objxl.Cells(i, 2).Value = Result
If UCase(Result) = "SCREEN" Then '''' Print in PLUM color
m = "A" + Trim(Str(i))
k = objxl.ActiveCell.Hyperlinks.Add(Range(m), msg)
objxl.Cells(i, 1).Font.Color = RGB(155, 0, 0)
objxl.Cells(i, 2).Font.Color = RGB(155, 0, 0)
objxl.Cells(i, 3).Font.Color = RGB(155, 0, 0)
End If

i = i + 1


Am i missing anything inthe references to be addedin testpartner or any other. Please help me.