Many thanks Alexey,

You are right in respect to the ";" at the end of the sentences. Unfortunately, I did not make the question correctly. Your code is somewhat equivalent to

Module[{}, {Hyperlink[
   "GraphicsObjectLabel", {"notebook.nb", "celltag"}],
  Hyperlink["GraphicsObjectLabel", "notebook.nb"]}] 

This time without the offending ";".

But I do not need a column of hyperlinks. The actual problem has nothing to do with ",", it results from the pieces of (* some executable code *) within the module to proper positioning the hyperlinks. This would not be neccesary if the current implementaion of multiple edges graphs worked as expected

ref/Graph

In fact the labels named as "GraphicsObjectLabel" in the hyperlinks are edges of a graph (see the graph below), where the hyperlinks are connections to other notebooks with the explanation of the flows represented by the edges. The whole code for the graph is pretty tricky and cannot be posted, since the current implementation of Matematica does not truly support multiple edges among vertices the actual code is a workaround to circumvent the problem already mentioned in other posts about the current multiple edges graph bug.

The multiple edge graph shown below relays on a primitive (function) programmed by David Park, which overcomes the bug and allows for refinning interactively the layout of the edges in a graph, at will.

Anyway, I haven’t solved yet the

Hyperlink["GraphicsObjectLabel", {"notebook.nb", "celltag"}]

issue; while

Hyperlink["GraphicsObjectLabel", "notebook.nb"]

works OK.

Again, any help will be welcomed.

Martin.

Hi Martin,

Hyperlink[<...>]; does not produce a hyperlink simply because you have suppressed the output from this piece of code by adding the ";" at the end. Please read the Documentation for CompoundExpression (;) and try the following:

Module[{hyperlink1, hyperlink2},
 (* some executable code *)
 (* first hyperlink *)
 hyperlink1 = Hyperlink["GraphicsObjectLabel", {"notebook.nb", "celltag"}];
 (* some executable code *)
 (* second hyperlink *)
 hyperlink2 = Hyperlink["GraphicsObjectLabel", "notebook.nb"];
 (* the output *)
 Column[{hyperlink1, hyperlink2}]
 ]