excel - 使用 perl 链接 Excel 工作表

Question

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

1. Excel::Writer::XLSX

2. 电子表格::WriteExcel

任何人都可以帮我编写一个简单的 Perl 脚本来执行此操作。

示例:-

工作表1

<小时/>

工作表2

因此，在上面的示例中，Worksheet1 中的规则列项 R1、R2、R3 应该是超链接，将我们带到规则列单击时分别为 R1、R2、R3 项目。

有人可以告诉我如何使用 perl 来完成它，或者至少让我在如何使用模块 Spreadsheet::WriteExcel 或 Excel::Writer::XLSX 上找到正确的方向针对这个问题。

请帮帮我..!!

Answer 1

使用 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' );