use Win32::OLE::Const;
my $xlConstants = Win32::OLE::Const->Load($Excel);

##</code><code>##

$Sheet->Range("B1:Q1")->{HorizontalAlignment} = $xlConstants->{xlCenter};