openoffice-basic - Libreoffice - 为网格系列创建相对超链接

Question

我有一个设置为 A1、A2、B1、B2、B3 等的网格。行从 A...Z 以及 AA 到 KG，列的范围从 1 到 1000。

感谢LibreOffice Draw 中的@Jim K - 根据查询表添加超链接，我们可以添加从 1 到 1000 的超链接，但我不确定如何嵌入第二个循环来执行此操作？

如果我们可以提供一个包含

A1, map_A1.pdf
A2, map_A2.pdf
FG89, map_FG89.pdf

这确保只有我们想要的文本是超链接的，它可以处理任何复杂的文件名。匹配也应该是精确的。

score 1 · Accepted Answer

要遍历字母，例如 A 到 Z：

Sub chars_loop
    Dim cval, c
    For cval = Asc("A") to Asc("Z")
       c = Chr(cval)
       Print(c)
    Next cval
End Sub

至于从 CSV 文件中读取，有两种从文件中读取的方法：

有关后者的示例，请参阅Andrew Pitonyak 的宏文档第 5.13 节。您可以使用 . 遍历文件中的所有行Do While Not EOF(iNum)。

1 回答 1