使用Perl链接excel工作表

我正在尝试编写一个perl脚本,它将第一个工作表中的单元格值链接到第二个工作表中使用perl的值。 我尝试使用以下perl模块: –

  1. Excel中::作家:: XLSX

  2. 电子表格:: WriteExcel

任何人都可以帮助我一个简单的Perl脚本,这样做。

例如: –

Worksheet1

在这里输入图像说明


Worksheet2

在这里输入图像说明

所以,在上面的例子中,Worksheet1中的规则列项R1R2R3应该是超链接,当点击时,它们分别带我们到规则列项R1R2R3

有人可以告诉我如何使用perl或至less推动我正确的方向如何使用模块Spreadsheet :: WriteExcelExcel :: Writer :: XLSX这个问题。

请帮我出来..!

使用Excel :: Writer :: XLSX,您可以使用write_url,然后使用write_formula方法。 这里是一个例子:

#!/usr/bin/perl use strict; use Excel::Writer::XLSX; my $workbook = Excel::Writer::XLSX->new( 'test.xlsx' ); my $worksheet1 = $workbook->add_worksheet('Worksheet1'); my $worksheet2 = $workbook->add_worksheet('Worksheet2'); $worksheet2->write_string(0,0, 'Rules'); $worksheet2->write_string(1,0, 'R1'); $worksheet2->write_string(2,0, 'R2'); $worksheet2->write_string(3,0, 'R3'); my $format = $workbook->add_format( color => 'blue', underline => 1 ); $worksheet1->write_url( 1,1, 'internal:Worksheet2!A2', $format); $worksheet1->write_formula( 1, 1, '=Worksheet2!A2' );