[amel27]

sergvg, попробуй вместо "ActiveWindow" поставить "Windows(1)"

[sergvg]

amel27, не помогло

[amel27]

sergvg, так вроде работает:

Код:

use Win32::OLE;

my $excel = Win32::OLE -> GetActiveObject('Excel.Application') || Win32::OLE -> new( 'Excel.Application', '' );
my $workbook = $excel -> Workbooks -> Add();
my $sheet = $workbook->Worksheets(1);
#................
$sheet->Range("C1")->Select;
$excel -> ActiveWindow -> {'FreezePanes'} = (1 == 1);

[sergvg]

о, спасибо, заработало.

достаточно просто 1 присвоить... Смутило меня ещё то, что такой вот код работает:

Код:

with ($excel -> ActiveWindow,  "FreezePanes" => "True", SplitColumn => 2, SplitRow => 0);

Только делает немного не то.