-1

A1、A2、B1、B2、B3 などとして設定されたグリッドがあります。行は A...Z から AA から KG まであり、列の範囲は 1 から 1000 です。

@Jim K in LibreOffice Draw -add hyperlinks based on query tableのおかげで、1 から 1000 までのハイパーリンクを追加できますが、これを行う 2 番目のループを埋め込む方法がわかりません。

以下を含む CSV を提供できれば、最も簡単です。

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

これにより、必要なテキストのみがハイパーリンクされ、複雑なファイル名に対応できるようになります。一致も正確である必要があります。

4

1 に答える 1

1

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 ファイルから読み取る限り、ファイルから読み取る方法は 2 つあります。

後者の例については、Andrew Pitonyak のマクロ ドキュメントセクション 5.13 を参照してください。を使用して、ファイル内のすべての行をループできますDo While Not EOF(iNum)。

于 2016-02-21T01:55:55.117 に答える