# Order Rows
$tmp = "$mylastcol2".'3';
$Rangea = $Sheet->Range("a1");
$Rangeb = $Sheet->Range("a5");
$Excel->Selection->Sort({Key1 => $Rangea,
                         Order1 => xlDescending,
                         Key2 => $Rangeb});