Help for this page
use Win32::OLE::Const; my $xlConstants = Win32::OLE::Const->Load($Excel);
$Sheet->Range("B1:Q1")->{HorizontalAlignment} = $xlConstants->{xlCente +r};