tcom tcl：尝试添加链接长度超过 255 个字符的超链接时出错

Question

我正在 Windows 10 上运行以下脚本，安装了 TCL8.4 和 tcom。 我有 Excel 2016 和空 Excel 文件“clone.xls”。 我正在尝试在第一个单元格中创建一个长度为 256 个字符的超链接

package require tcom

set application [::tcom::ref createobject "Excel.Application"]
$application Visible 1

set workbooks [$application Workbooks]
set workbook [$workbooks Open [file nativename [file join [pwd] clone.xlsx]]]
set worksheets [$workbook Worksheets]
set worksheet [$worksheets Item [expr 1]]
set cells [$worksheet Cells]

set a 1234567890
set a [string repeat $a 25]
$cells Item 1 A "=HYPERLINK(\"[set a]123456\",\"Google\")"

$workbook Save
$application Quit

我尝试了一些组合，发现只要超链接中的链接超过 255 个字符，就会抛出以下错误。

0x800a03ec {未知错误} 执行时 "$cells 项目 1 A "=HYPERLINK("[set a]123456","Google")"" （文件“Trial4.tcl”第 14 行）

如果将“Google”替换为任意数量的字符，则不会出现错误。 有人可以告诉它如何解决吗？ 提前致谢。 --紫外线。

Answer 1

Excel 对

HYPERLINK

函数有 255 个字符的限制（已经是 2023 年了，Excel 365 超链接函数限制为 255 个字符？、如何做超过 255 个字符的超链接？）。 两篇文章都提供了解决方法：

绕过公式栏中 255 个字符限制的一种方法是 将 URL 拆分为两个单元格，例如单元格 A1 中 URL 的一半和 另一半在单元格 A2 中。然后在另一个单元格中放入您的超链接 公式...

=HYPERLINK(A1&A2,"Search Google")