[Solved] Get entire Row when clicking a hyperlink

[xxhajime08xx]

Hi,

Just started learning about openoffice so I might be missing something. I've already searched the forum and google for 2 days (maybe I'm not getting the keywords / terms right?)
I have a report generated by a macro, now one of the fields namely Col A contains a hyperlink. This hyperlink also calls a macro.

Code: Select all

=HYPERLINK("vnd.sun.star.script:Standard.Link.Show?language=Basic&location=document";ROW()-1)

Now the question is, "Is it possible to get the value of the entire row if I click the hyperlink?"
ie :
If I click on the hyperlink in "A1" will display a msgbox containing the value of "B1","C1",.....
If I click on the hyperlink in "A2" will display a msgbox containing the value of "B2","C2",.....
and so on

Thanks

[hubert lambert]

Hello,

It should work using this formula:

Code: Select all

=HYPERLINK("vnd.sun.star.script:Standard.Link.Show?language=Basic&location=document&row=" & ROW()-1; ROW()-1)

and something like this as your "Show" macro:

Code: Select all

sub Show(arg1, arg2, arg3)
    doc = thiscomponent
    sheet = doc.CurrentController.ActiveSheet
    row = cdbl(split(arg1, "row=")(1))
    cells = sheet.Rows(row).queryContentCells(23).Cells
    values = ""
    for each cell in cells
        address = split(cell.AbsoluteName, "$")
        if address(2) <> "A" then
            values = values + address(2) + address(3) + ": " + cell.String
            values = values + chr(10)
        end if
    next cell
    msgbox values
end sub

[xxhajime08xx]

Hi hubert lambert

Many thanks for the help, works like a charm.
Though I still need to check on how this will run as there are some which I'm not familiar with.